Miren Este Codigo

[saulmurillo]

Me pueden Decir que es lo malo que tengo

Dim conn As OdbcConnection
Dim Ssql As String
Dim ejecutar As OdbcCommand
Dim DatosUsuarios As Integer
conn = New OdbcConnection("DRIVER={Microsoft FoxPro VFP Driver (*.dbf)};dbq=C:\DATA\PREMP.DBF")
conn.Open()

Ssql = "Insert into C:\Data\Premp.dbf(emp_no,emp_first,emp_last,emp_ad dr,emp_city,emp_phone,emp_type,sex,marital,ssno,Bi rth_date,nacion,cip,hire_date)"
Ssql &= "Values('" & codtpm & "' , '" & activo & "', '" & tipoEmpleado & "' ,"
Ssql &= "'" & nombre & "' , '" & apellidos & "' , '" & fechanacimiento & "' ,"
Ssql &= "'" & fechanacimiento & "' , '" & lugarnacimiento & "' , '" & nacionalidad & "')"

ejecutar = New OdbcCommand(Ssql, conn)
DatosUsuarios = ejecutar.ExecuteNonQuery()
conn.Close()