Trucsweb.com

Forum de discussion

 Forum « Programmation ASP » (archives)

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

Envoyé: 25 mai 2005, 7h33 par tribalwoman


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... 
Aucun médias sociaux
X

Trucsweb.com Connexion

X

Trucsweb.com Mot de passe perdu

X

Trucsweb.com Conditions générales

Conditions

Responsabilité

La responsabilité des Trucsweb.com ne pourra être engagée en cas de faits indépendants de sa volonté. Les informations mises à disposition sur ce site le sont uniquement à titre purement informatif et ne sauraient constituer en aucun cas un conseil ou une recommandation de quelque nature que ce soit.

Aucun contrôle n'est exercé sur les références et ressources externes, l'utilisateur reconnaît que les Trucsweb.com n'assume aucune responsabilité relative à la mise à disposition de ces ressources, et ne peut être tenue responsable quant à leur contenu.

Droit applicable et juridiction compétente

Les règles en matière de droit, applicables aux contenus et aux transmissions de données sur et autour du site, sont déterminées par la loi canadienne. En cas de litige, n'ayant pu faire l'objet d'un accord à l'amiable, seuls les tribunaux canadien sont compétents.

X

Trucsweb.com Trucsweb

X

Trucsweb.com Glossaire

X

Trucsweb.com Trucsweb

X

Trucsweb.com Trucsweb

Conditions

Aucun message!

Merci.

X
Aucun message!
X

Trucsweb.com Créer un compte