Problema al insertar en vb6
Publicado por Alejandro (4 intervenciones) el 16/02/2016 13:22:02
Hola buenas, soy nuevo aqui, y la verdad es que tengo un sistema funcionando en Vb6, y me pidieron generar un nuevo modulo, el cual toma el asunto de las transferencias sacadas del banco con X formato predefinido y separarlo en campos de otra tabla, el problema es que me arroja el " Error 2147217900 (80040e14) en tiempo de ejecucion : FALTA PUNTO Y COMA (;) AL FINAL DE LA INSTRUCCION SQL." y segun la experiencia, VB6 no trabaja con terminaciones de " ; " y ya no se donde mas buscar y que mas hacer.
Muchas gracias por su ayuda.
Este es el código:
Muchas gracias por su ayuda.
Este es el código:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
sSql = "INSERT INTO tmp3_Transferencias ( Recibido," & _
" Asunto," & _
" AsuntoEncontrado," & _
" Aquien," & _
" Asunto2," & _
" Asunto2Encontrado," & _
" Monto," & _
" Asunto3," & _
" Asunto3Encontrado," & _
" RutProveedor," & _
" Observacion)" & _
" VALUES ( format([Recibido]," & "'dd-mm-yyyy'" & ")," & _
"[Asunto]," & _
"InStr([Asunto],'/')," & _
"Mid([Asunto],1,[AsuntoEncontrado]-2)," & _
"Mid([Asunto],[AsuntoEncontrado]+3)," & _
"InStr([Asunto2],'/')," & _
"Mid([Asunto2],1,[Asunto2Encontrado]-2)," & _
"Mid([Asunto2],[Asunto2Encontrado]+3)," & _
"InStr([Asunto3],'/')," & _
"Mid([Asunto3],1,[Asunto3Encontrado]-2)," & _
"Mid([Asunto3],[Asunto3Encontrado]+3))" & _
" From tmp2_Transferencias"Valora esta pregunta
0