28/04/2006, 08:08
|
| | | Fecha de Ingreso: marzo-2006
Mensajes: 36
Antigüedad: 19 años, 2 meses Puntos: 0 | |
| help!!!! please
hola amigos:
miren tengo este problemin...., tengo una base de datos sybase y quiero guardar la imagen en el servidor.
tengo este codigo, pero no me funciona porque me guarda todo menos la imagen.
aqui les dejo el codigo, para que le revisen y me digan que puedo hacer
Dim oConn,strSQL
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open("DSN=DESARROLLO;UID=sa;PWD=smartsoft")
strSQL="INSERT INTO PERSONAS_FOTOS (CODIGO_TRABAJADOR, CORRELATIVO, TIPO_DOCUMENTO,FOTOGRAFIA) VALUES ('" & fnameInput & "',1,'FOTO', '')"
oConn.Execute(strSQL)
strSQL= "declare @punt varbinary(16) "
strSQL= strSQL & "select @punt = textptr(FOTOGRAFIA) from PERSONAS_FOTOS where CODIGO_TRABAJADOR = '" & fnameInput & "' and CORRELATIVO =" & 1 & " and TIPO_DOCUMENTO=" &"'FOTO' WRITETEXT PERSONAS_FOTOS.FOTOGRAFIA @punt '"& FOTOGRAFIA &"'"
oConn.Execute(strSQL)
ojalá me ayuden
oConn.CLOSE
Set oConn = nothing |