Colegio de Estudios Científicos Y Tecnológicos del Estado de México
Plantel Toluca
Manual Tecnico
ING. Jovani Vallejo Abundis
Elaboro: Gemma Mejía Mendoza
Cuarto Semestre
Grupo: 408Carrera: Técnico en Informática
Fecha de entrega: 18-07-2012




Formulario 1

Dim BD As New ADODB.Connection/declara todas las variables de laconexión/
Dim rs As New ADODB.Recordset/declara todaslas variables de la Recordset/
Private Sub Command1 Click ()/nombre del evento/
rs.Open "SELECT * FROM bibliotecaWHERE FOLIO = '" & Text2 & "' , BD/selection de la tabla controltodos los campos para abrirlos y el folio es igual al texto 2/
fecha = Text3/la fecha es igual al texto 3 texto y variable/
ctitulo = rs.Fields("TITULO")/la variable ctitulo estará en el vampotitulo/
cmateria = rs.Fields("TEMA") /la variable cmateria estará en el campo tema/
id_control = Text1/texto y variable/
folio = Text2 /texto y variable/
tipo_prestamo = cmbpalabras /variable es igual ael combo con el nombre/
grupo = cmbgrupo /variable igual al combo nombrado/
lugar_prestamo = cmblugar /variable es igual al combo nombrado/
rs.Close /cierra la sentencia recordset/
rs.Open"INSERT INTO control VALUES('" &id_control& "', '" & fecha & "', '" & folio & "', '" &ctitulo& "', '" &cmateria& "', '" &tipo_prestamo& "', '" &cmbgrupo& "', '" &lugar_prestamo& "')", BD /abrir la tablacontrol e insertar los valores de id_control,fecha,folio,ctitulo,cmateria,tipo_prestamo,cmbgrupo,lugar_prestamo/
Text1 = ""/limpiar caja de texto/
Text2 = "" /limpiar caja de texto/
Text3= "" /limpiar caja de texto/
MsgBox "registroguardado"/mensaje de que el registro se guardo/
End Sub/fin de programa/
Private Sub Command2_Click() /nombre del programa evento/
UnloadMe/descargame/
Load Form2/carga el formulario 2/
Form2.Show /muestra el formulario 2/
End Sub /fin de programa/
Private Sub Command5_Click()/nombre del programa evento/
Unload Me/descargame/
Load... [continua]

Leer Ensayo Completo

Cite este ensayo

APA

(2012, 08). Ejemplos de manuales tecnicos. BuenasTareas.com. Recuperado 08, 2012, de http://www.buenastareas.com/ensayos/Ejemplos-De-Manuales-Tecnicos/5092169.html

MLA

"Ejemplos de manuales tecnicos" BuenasTareas.com. 08 2012. 2012. 08 2012 <http://www.buenastareas.com/ensayos/Ejemplos-De-Manuales-Tecnicos/5092169.html>.

MLA 7

"Ejemplos de manuales tecnicos." BuenasTareas.com. BuenasTareas.com, 08 2012. Web. 08 2012. <http://www.buenastareas.com/ensayos/Ejemplos-De-Manuales-Tecnicos/5092169.html>.

CHICAGO

"Ejemplos de manuales tecnicos." BuenasTareas.com. 08, 2012. consultado el 08, 2012. http://www.buenastareas.com/ensayos/Ejemplos-De-Manuales-Tecnicos/5092169.html.