Ver Mensaje Individual
  #6 (permalink)  
Antiguo 29/12/2010, 11:41
Avatar de lokoman
lokoman
 
Fecha de Ingreso: septiembre-2009
Mensajes: 502
Antigüedad: 14 años, 7 meses
Puntos: 47
Respuesta: error -2147217900 (80040e14)

Cita:
Iniciado por puma_ferrer Ver Mensaje
a mi tambien nme aparece el mismo error en una centencia que tengo para la conection de vase de datos pero el error mio es en el boton eliminar aqui les envio el codigo de dicho boton para ver si me pueden ayudar:

dim rs as new adodb.recordset
dim sSql as string
if tx_rut.enable = true then
msgbox "xxxxxxxx"
tx_rut.setfocus
else
if msgbox("¿xxxx" & tx_nom & "?", vbquestion + vbyesno,"xxxxxx") = vbyes then
sSql = "deletefrom tb_mante" ' tb_mante es el nombre de la tabla
sSql = sSql & "where rut = " & tx_rut
else

msgbox "xxxxxxxx", vbinformation, "xxxxxxx" '( en las x van escritos los mensajes que deseen)
end if
end if

todo esto en visual basic 6 con una base de datos sql 2005
Hola!!
Veo en tu query que no respetas los espacios... intenta asi:
Código vb:
Ver original
  1. sSql = "delete from tb_mante " ' tb_mante es el nombre de la tabla
  2.   sSql = sSql & "where rut = " & trim(tx_rut)