SQL EN VISUAL BASIC

Rossana
24 de Abril del 2004
Quiero agregar un registro a una tabla a través de sql
coloqué esta instrucción

Public sql as string
sql = insert into tabla (N°Mensaje, Carpeta, Día , Mes, Año, Para, De, Asunto, Descripción, Observaciones) Values ('"&lblnumensaje&"', '"&combo1.text&"','"&combo2.text"', '"&combo3.text&"','"&combo4.text&"', '"&text5&"', '"&text4&"','"&text6&"','"&text7&"', '"text8"')

Lo valores son los tomados de las cajas de texto, por lo tanto son introducidos por el usuario.
Pero no funciona. Por favor quien me pueda ayudar se lo agradeceré.

ramon
24 de Abril del 2004
Set conexion = New ADODB.Connection
Set registro = New ADODB.Recordset
conex = Adodc2.ConnectionString
conexion.Open conex
'Procedimiento adicionar registro
Set registro = conexion.Execute("select * from nombre de tu tabla " _
& "where llavedelatabla='" & tex1 & "'")
If registro.EOF Then
conexion.Execute "insert into nombredelatabla(campo1tabla,campodostabla,campotrestabla)" _
& " values ('" & tex1 & "','" & tex2 & "','" & text3 & "')"
MsgBox "DATOS ADICIONADOS"
limpiar
Else
MsgBox " ya existe un registro con esa llave primaria "
End If
registro.Close
conexion.Close
End If

Rossana
24 de Abril del 2004
Gracias

¿Execute también puede funcionar con DAO?.