A ver si me das una ayudita. :P
La Tabla se llama TblDatos, la Base de Datos se llama Datos.
Tengo dos coneciones arriba que son:
Dim CnDatos As New ADODB.Connection
Dim RsTblDatos As New ADODB.Recordset
Yo quiero insertar unos datos de unos Texbox, eh hice lo siguiente:
If CnDatos.State = 1 Then CnDatos.Close
If RsTblDatos.State = 1 Then RsTblDatos.Close
CnDatos.Open "dbDatos"
RsTblDatos.Open "TblDatos", CnDatos, 3, 3
Insert Into
TblDatos(Nombre,Direccion,TelCasa,TelTrabajo,TelCe lular,EMail,PaginaWeb,_
Tipo,Nota,Fecha) Values("'TxtNombre'" & "'TxtDireccion'" & "'TxtTelCasa'" &_
"'TxtTelTrabajo'" & "'TxtTelCelular'" & "'TxtEMail'" & "'TxtPaginaWeb'" & "'CmbTipo'" &_
"'TxtNota'" & "'DtpFecha'")
El Inser Into me da error, las letras siempre están en rojo, que estoy
haciendo mal?
.::RsOfT::.
--El que se aferra a lo conocido, nunca conocerá lo desconocido--
--Es intentando lo imposible como se realiza lo posible--
--Es de pesimo gusto contentarse con algo mediocre cuando lo excelente esta a nuestro alcance--