Poser une question

Re: pb d'upload avec aspsmartupload dans une base de données

mon champs dans ma base est de type mémo, j'ai aussi essayer avec le type objet OLE.
et ca me met une erreur d'execution: "Type incompatible".

mon code est le suivant:

dim mySmartUpload
dim oConn

' --- Creation de l'objet
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")

' Upload
mySmartUpload.Upload
chemin = "C:\"
mySmartUpload.Save(chemin)

' --- CONNEXION A LA BASE
set ob_m=server.createobject("ADODB.connection")
ob_m.open application("asa_moteur")

' --- Ouverture d'un recordset
sql_re="SELECT * FROM recherche"
set ob_re=server.createobject("ADODB.recordset")
set ob_re.ActiveConnection = ob_m
ob_re.Source = sql_re
ob_re.LockType = 3
ob_re.CursorType = 3
ob_re.Open

' --- Selection d'un fichier
for each file in mySmartUpload.Files
' --- Seulement s'il existe
if not file.IsMissing then
' --- enregistrement du fichier courant dans la BD ob_re.AddNew
file.FileToField ob_re.fields("lb_contenu")
ob_re("lb_lien")=file.filename
ob_re.update
ob_re.moveprevious

response.write("<br>" & ob_re("lb_contenu"))
end if
next

Réponses

Aucune réponse à ce message...