SQL Server - Insertar imagen en sql 7.0 con asp

 
Vista:
sin imagen de perfil

Insertar imagen en sql 7.0 con asp

Publicado por Claudio (1 intervención) el 23/05/2006 21:48:01
Hola mi problema es que no consigo insertar una imagen en sql 7.0 con asp por favor ayuda
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Insertar imagen en sql 7.0 con asp

Publicado por Andres sotelo (1 intervención) el 15/06/2006 21:15:19
<%
response.write "sdfdfds"
'Dim SetImagen As New ADODB.Stream
'SetImagen.Type = adTypeBinary
'SetImagen.Open

'SetImag.LoadFromFile "imagen.gif"

'2.- SE ABRE UN RECORDSET, USTEDES PUEDEN ABRIRLO A SU MODO, YO UTILICE UNA CADENA DE CONEXION
'Dim ObjetoRecordset As New ADODB.Recordset
'ObjetoRecordset.ActiveConnection = "Provider=suServidor;Data Source=ASOTELO2K;Database=basededatos;UID=usario;PWD=password;"
'SQL = "su sql"
'ObjetoRecordset.Source = SQL
'ObjetoRecordset.CursorType = adOpenStatic
'ObjetoRecordset.CursorLocation = adUseServer
'ObjetoRecordset.LockType = adLockOptimistic
'ObjetoRecordset.Open

'3.- SE ASIGNA LA CONEXION ADOSTREAM A EL RECORDSET Y SE GUARDA
'ObjetoRecordset.Source!FotoEmpleado = SetImag.Read
'ObjetoRecordset.Update
'ObjetoRecordset.Close

%>
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Insertar imagen en sql 7.0 con asp

Publicado por Pablo (1 intervención) el 05/04/2010 17:18:06
Buenos dias, estoy teniendo un problema con este codigo:

Private Sub Command1_Click()
'1.- SE ESTABLECE EL ARCHIVO DE LA IMAGEN A LA CONEXION ADOSTREAM
Dim SetImagen As New ADODB.Stream
SetImagen.Type = adTypeBinary
SetImagen.Open

SetImagen.LoadFromFile "C:\Factura.JPG"

'2.- SE ABRE UN RECORDSET, USTEDES PUEDEN ABRIRLO A SU MODO, YO UTILICE UNA CADENA DE CONEXION
Dim ObjetoRecordset As New ADODB.Recordset
ObjetoRecordset.ActiveConnection = "Provider=SQLOLEDB.1;Password=........"
SQL = "SELECT * FROM T_Fedr WHERE (Id_Factura = 1)"
ObjetoRecordset.Source = SQL
ObjetoRecordset.CursorType = adOpenStatic
ObjetoRecordset.CursorLocation = adUseServer
ObjetoRecordset.LockType = adLockOptimistic
ObjetoRecordset.Open

'3.- SE ASIGNA LA CONEXION ADOSTREAM A EL RECORDSET Y SE GUARDA
ObjetoRecordset.Source!Id_Factura = SetImagen.Read

ObjetoRecordset.Update

'NOTAS. SE PUEDEN INCLUIR OTROS CAMPOS DE LA BASE PARA ASI AL MISMO TIEMPO GUARDAR OTROS DATOS
'ESTE CODIGO MANEJA LA REFERENCIA AL ADO Microsoft ActiveX Data Objects 2.8 Library que viene con el MDAC 2.

en la linea :ObjetoRecordset.Source!Id_Factura = SetImagen.Read me da error(424 se requiere un objeto...) alguien me puede ayudar?????

Desde ya muchas gracias.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar