deplacer une image parcouru dans un serveur

Question

bonjour a tous
je suis nouvelle sur le forum j'ai une question a poser je vous serez tres reconnaissante si vous me donner la reponse
alors, je travail sur un site asp sur la page ajouter.asp j'ai un formulaire qui comporte des champs parmi eux j'ai le champs image et un bouton "parcourir" je veux apres avoir selectionner la photo a vouloir ajouter en cliquant sur le bouton "ajouter" que cette photo se place sur le serveur 
(je ne sais pas si je suis assez claire sur ce propos mais j'ai besoin de ce code au plutot 

merci davance

cs_Nurgle · Answer

Salut,



Si j'ai bien compris tu veux uploader un fichier depuis le poste client, sur le poste serveur 



Pour cela, en asp, tu as besoin d'un composant externe. Il en existe plusieurs, les plus connus &#233;tant ASPSmartUpload et ASPUpload.



Je te renvois vers cette page o&#249; l'on explique comment utiliser le composant ASPSmartUpload : 

Upload de fichiers (asp-php.net)



De plus, si tu es chez un h&#233;bergeur, tu ne peux pas installer toi m&#234;me le composant , tu dois donc leur demander plut&#244;t quels composants sont install&#233;s sur leurs serveur...



A+++

Nurgle 
Il est plus ais&#233; d'&#234;tre sage pour les autres que pour soi-m&#234;me ! (La Rochefoucauld)

perle007 · Answer

merci beaucoup pour ton aide

perle007 · Answer

j'esp&#232;re non pas en faire trop  je veux savoir ou est ce qu'on place precisement ce composant puisque j'ai la possibilit&#233; d'installer sur le serveur..
merci encore

cs_Nurgle · Answer

Tu peux placer la dll o&#249; tu le d&#233;sire...

Pour enregistrer ensuite la dll, tu dois avoir acc&#232;s &#224; l'invite de commande MS-DOS.

Ouvre la et tappe : "REGSVR32.EXE c:\undossier\aspSmartUpload.dll"



Ensuite tu pourras utiliser le composant comme indiqu&#233; dans le tutorial dont je t'ais donn&#233; le lien 



voil&#224;...


Nurgle 
Il est plus ais&#233; d'&#234;tre sage pour les autres que pour soi-m&#234;me ! (La Rochefoucauld)

perle007 · Answer

alors là je rencontre un prb que je ne compren pa!! deja je tiens a souligner que je suis tres debutante (c'est d'ailleurs mon tout premier site en asp) le prb etant que l'image ne se telecharge pas sur la base de donnee il me note seulement son chemin a savoir c:\...... je te passe le code en entier (c'est une page d'ajout) voila mon code merci de me modifier ce qu'il y a a etre modifier: <%@language="VBscript"%> Conseil en strategie <% title=Request("title") if title = "" then response.write("veuillez entrez un titre") else Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload") mySmartUpload.MaxFileSize = 1024 mySmartUpload.Upload intCount = mySmartUpload.Save(admin_files) if error then response.write ("error.description") else For each file In mySmartUpload.Files Nom : <%=file.FileName%> Taille : <%=file.Size%> octets Type : <%=file.ContentType%> <% next header=request.Form("header") text=Request.Form("text") typ="conseil" image=Request.Form("image") sql="insert into services_fr (service_title,service_header,service_text,service_image,service_type) values ('" & title & "','" & header & "','" & text & "','"&image&"','"&typ&"')" objcon.execute sql response.write("Enregistrement avec succés") objcon.close end if end if %> %

cs_Nurgle · Answer

En fait le probl&#232;me vient du fait que tu ne peux pas utiliser dans la
m&#234;me page &#224; la fois Request.Form et le composant ASPSmartUpload.

Tu dois r&#233;cup&#233;rer les contenus de test champs aussi via aspsmartupload.

Il y a &#233;galement un deuxi&#232;me probl&#232;me  : 

Tu veux stocker le fichier sur le serveur et ensuite mettre l'url de ce fichier dans la base de donn&#233;es  ou alors tu veux mettre l'image elle-m&#234;me dans la base de donn&#233;e 



Exemple :

<%

Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")

title = mySmartUpload.Form.Item("title")

if title = "" then

 response.write("veuillez entrez un titre")

 else

   mySmartUpload.MaxFileSize = 1024

  mySmartUpload.Upload

  mySmartUpload.Save("/undossier/unautredossier/")

    ' sauvegarde du fichier

   if Err then 

    response.write (Err.description)

    ' traitement des erreurs

   else

  header=mySmartUpload.Form.Item("header")

  text=mySmartUpload.Form.Item("text")

  typ="conseil"

  image=mySmartUpload.Form.Files.Item(0).FileName

 ' r&#233;cup&#233;ration du nom de fichier

  sql="insert
into services_fr
(service_title,service_header,service_text,service_image,service_type)
values ('" & title & "','" & header & "','" & text
& "','"&image&"','"&typ&"')"   

  objcon.execute sql

  response.write("Enregistr&#233; avec succ&#232;s")

  objcon.close

end if

end if

%>



L&#224; le code va pouvoir avoir acc&#232;s au contenu des champs (comme avec
Request.Form) puis va uploader ton fichier dans le dossier
"/undossier/unautredossier/", puis va mettre le nom du fichier, et le
contenu des champs dans ta base de donn&#233;es.

Ne sachant pas exactement ce que tu veux faire...

voil&#224; 


Nurgle 
Il est plus ais&#233; d'&#234;tre sage pour les autres que pour soi-m&#234;me ! (La Rochefoucauld)

perle007 · Answer

ce dont j'ai besoin o fait c'est d'un formulaire qui comporte des champs parmi eux le champs image acot&#233; du kel nous avons le bouton "parcourir" et nous avons deux bouton "ajouter" "annuler"
sur le serveur je veux enregistrer l'image que l'administrateur aura selectionner et non le chemin donc l image sera enregistrer ds le repertoire "admin_files" maintnant il se peut que deux images differentes aient le meme nom donc il fo fair un controle ki permettera de renommer la 2eme image au cas ou ce nom existe deja.
ke tt senregistre sur la base de donnee sql ke j'ai
voila c'est d'un formulaire avec c caracteristiques ke j besoin
est ce ke tu pe me passer le code entier.stp j'en ai besoin.
merci pour ton aide 10000...0000 merci

perle007 · Answer

je viens de tester le code que tu m'as passer, 
deja voil&#224; le chemin du dossier ou je veux stocker les images: "c:/webserver/ace/admin_files" ceci dit moi j'ai mis: "//webserver/ace/admin_files " sauf que l&#224; aussi je ne reussi pas a voir limage que j'ai selectionner ds le dossier admin_file et aussi une fois j'accede a la page .asp il me lis directement le if donc puiske les champs a l ouverture de la page sont vide il me donne le message "veuillez entrer un titre" et a la fin quand je rempli les champs il ne me donne pas le message "enregistrer avec succ&#232;s"
merci beucoup de me repondre

perle007 · Answer

stp repond moi au plus tot j'ai besoin de ce code today merci beucoup

cs_Nurgle · Answer

dans mon code, si tu fais :

 mySmartUpload.Save("c:/webserver/ace/admin_files")

&#231;a devrait fonctionner, non ? 



Je pr&#233;cise une chose importante : IIS doit bien s&#251;r avoir les droits d'&#233;criture sur le dossier en question. Voir ce tutorial 

sinon pour r&#233;cup&#233;rer tes champs, tu fais comme c'est montr&#233; :

mySmartUpload.Form.Item("champ")




Nurgle 
Il est plus ais&#233; d'&#234;tre sage pour les autres que pour soi-m&#234;me ! (La Rochefoucauld)

perle007 · Answer

c bon ca a fonctionner maintenant je rencontr le prb suivant: quand j'ajoute 2 images ayant le meme nom ya la premiere qui s'ecrase donc je ve k la 2eme images soit renommer et non kil ecrase la premiere
thx a lot

cs_Nurgle · Answer

Eh bien, il y a plusieurs solutions.

Le plus simple pour &#233;viter ce genre de probl&#232;mes est d'attibuer un nom automatiquement.

Par exemple, apr&#232;s le :

mySmartUpload.Save("c:/webserver/ace/admin_files")

tu peux rajouter :

mySmartUpload.Form.Files.Item(0).SaveAs(filename)

o&#249; filename peut &#234;tre &#233;gal &#224; un truc du genre "image_" & title

Comme &#231;a chaque image est sauvegard&#233;e avec un nom unique.

Bien s&#251;r tu peux le faire avec n'importe quel champ de ta base (si tu
as une cl&#233; primaire, du genre un "num&#233;ro auto", je te conseille
d'utiliser celui-l&#224;).


Nurgle 
Il est plus ais&#233; d'&#234;tre sage pour les autres que pour soi-m&#234;me ! (La Rochefoucauld)

perle007 · Answer

j'ai inserer le code ke tu m'as donner mais il me donne erreur :  
Erreur d'ex&#233;cution Microsoft VBScript error '800a01b6' 
Cet objet ne g&#232;re pas cette propri&#233;t&#233; ou cette m&#233;thode: 'Files' 
/admin/add_conseil_action.asp, line 10  

quand jenleve files et j ne l&#233;ss ke save as il m di kom kwa il n reconn&#233; pas l objet
chez pas quoi faire 
merci de m onner un coup d main

perle007 · Answer

au fait moi je crois qu'il faudra faire un if c'est a dire si le nom d'une image est pareil qu'un nom deja existant dans le dossier (ds ce cas admin_files) qu'il le renomme automatiquement
qu'est tu en dis?? moi je ne sais pas le code exact que je dois mettre :(:(:(

cs_Nurgle · Answer

j'avais pens&#233; &#224; &#231;a, le seul probl&#232;me c'est qu'il faut utiliser le FileSystemObject !

(certains h&#233;bergeurs ne l'autorisent pas, surtout les gratuits)

Utiliser le FileSystemObjet.



J'esp&#233;rait ne pas avoir &#224; l'utiliser car &#231;a ralentit l'ex&#233;cution de ta page pour pas grand chose...mais bon 

Je vais chercher si il n'y a pas un moyen de le faire directement avec l'objet AspSmartUpload.



A+++

Nurgle 
Il est plus ais&#233; d'&#234;tre sage pour les autres que pour soi-m&#234;me ! (La Rochefoucauld)

perle007 · Answer

oki merci de m'en chercher sinon bein dis moi comment faire FileSystemObject..merci bcppppppppppppp et stp jen&#233; besoin pour demain donc pas grave si ca ralentit le telechargement le principal c'est que ca marche

cs_Nurgle · Answer

essaye &#231;a :



<%

dim fs,fname

set fs=Server.CreateObject("Scripting.FileSystemObject")



if fs.FileExists("c:/webserver/ace/admin_files/" & mySmartUpload.Files(0).FileName)= false then

'tout le traitement : upload, etc...

else

Response.Write("Le fichier existe d&#233;j&#224; ! Tant pis pour vous :P")

end if 

%>



J'ai pas test&#233; mais, de m&#233;moire, &#231;a doit &#234;tre &#231;a.

Bien s&#251;r tu peux mettre ce que tu veux &#224; la place dur Response.Write(),
tu peux demander &#224; l'utilisateur de reposter le formulaire avec un
autre nom de fichier, ou n'importe quoi d'autre...


Nurgle 
Il est plus ais&#233; d'&#234;tre sage pour les autres que pour soi-m&#234;me ! (La Rochefoucauld)

cs_Nurgle · Answer

petite correction 



Ala place de :

 dim fs,fname
Mettre tout simplement :

 dim fs

perle007 · Answer

donc si j'ai bien compris je remplace le code que j'avais ecrit celui ou il y a mysmartupload ...etc par le code que tu viens de me donner ou quoi sinon??merciiiiiiiiiiiiiiiiiiiiii

perle007 · Answer

au fait moi je n veux pas que l'utilisateur plutot l'administrateur se rende compte que le nom de cet image image existe mais qu'il la renomme et c'est tout tu vois a quoi je veux en venir???
je desespere :'(:'(:'(:'(
merci de me tenir en aide

cs_Nurgle · Answer

Non, tu prend tout ton code qui fonctionne.

Tu rajoute au d&#233;but (avant ton code) :

 dim fs
 set fs=Server.CreateObject("Scripting.FileSystemObject")
 if fs.FileExists("c:/webserver/ace/admin_files/" & mySmartUpload.Files(0).FileName)= false then



Et &#224; la fin (apr&#232;s tout ton code) :

 else
 Response.Write("Le fichier existe d&#233;j&#224; ! Tant pis pour vous :P")
 end if 



voil&#224;...


Nurgle 
Il est plus ais&#233; d'&#234;tre sage pour les autres que pour soi-m&#234;me ! (La Rochefoucauld)

cs_Nurgle · Answer

d&#233;sol&#233; j'avais pas vu ton post d'avant (on a post&#233; &#224; 1 minute d'&#233;cart )



C'est justement sur la partie renommage que je bloque...

Je vais chercher comment tester si le fichier cible existe d&#233;j&#224; et dans
ce cas souvegarder le fichier sous un autre nom (&#231;a doit &#234;tre
quelquepart dans la documentation en anglais d'AspSmartUpload )

Nurgle 
Il est plus ais&#233; d'&#234;tre sage pour les autres que pour soi-m&#234;me ! (La Rochefoucauld)

perle007 · Answer

au fait j'ai pu me procurer ce code l&#224; je te l pass

Set Fichier = Server.CreateObject("Scripting.FileSystemObject") 
vrai=0 
ctr="" 
do while vrai=0 
   If Fichier.FileExists(nom&ctr&"."&extension) Then 
      ctr=clng(ctr)+1 
   else 
      vrai=1 
   end if 
loop 

mais il me donne erreur ici : decoupe=split(fichier,".",-1,1) ' pour avoir nom et extension 
nom=decoupe(0) 
extension=decoupe(1)

cs_Nurgle · Answer

c'est quoi l'erreur qu'il te donne ?

Nurgle 
Il est plus ais&#233; d'&#234;tre sage pour les autres que pour soi-m&#234;me ! (La Rochefoucauld)

perle007 · Answer

voila l'erreur

  
Erreur d'ex&#233;cution Microsoft VBScript error '800a01b6' 
Cet objet ne g&#232;re pas cette propri&#233;t&#233; ou cette m&#233;thode 
/admin/add_conseil_action.asp, line 7 

line 7 = decoupe=split(fichier,".",-1,1)

cs_Nurgle · Answer

decoupe = Split(fichier,".")



&#231;a devrait marcher correctement comme &#231;a 

(mais je ne vois pas o&#249; &#233;tait l'erreur, la fonction split peut bel et bien prendre 4 param&#232;res...enfin bon )


Nurgle 
Il est plus ais&#233; d'&#234;tre sage pour les autres que pour soi-m&#234;me ! (La Rochefoucauld)

perle007 · Answer

bein ca ne marche pas :'(:'( re voila mon code <%@language="VBscript"%> <% Set Fichier = Server.CreateObject("Scripting.FileSystemObject") vrai=0 ctr="" decoupe=split(fichier,".") ' pour avoir nom et extension nom=decoupe(0) extension=decoupe(1) do while vrai=0 If Fichier.FileExists(nom&ctr&"."&extension) Then ctr=clng(ctr)+1 else vrai=1 end if loop Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload") mySmartUpload.DenyPhysicalPath = True response.Write(titre) mySmartUpload.MaxFileSize = 51200 mySmartUpload.Upload mySmartUpload.Save ("/admin_files") if Err then response.write (Err.description) else For each file In mySmartUpload.Files image = file.FileName next titre = mySmartUpload.Form.Item("title") header=mySmartUpload.Form.Item("header") text=mySmartUpload.Form.Item("text") typ="conseil" sql="insert into services_fr (service_title,service_header,service_text,service_image,service_type) values ('" & titre & "','" & header & "','" & text & "','"&image&"','"&typ&"')" objcon.execute sql response.write("Enregistré avec succès") objcon.close end if %>

perle007 · Answer

stp si  tu as une reponse a me donner stp n'hesite pas j'en ai vraiment besoin stp stp stp

cs_Nurgle · Answer

essaye &#231;a :



Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")

  mySmartUpload.DenyPhysicalPath = True

 response.Write(titre)

    mySmartUpload.MaxFileSize = 51200

    mySmartUpload.Upload

    dim fs    
    set fs=Server.CreateObject("Scripting.FileSystemObject")
     if fs.FileExists("c:/webserver/ace/admin_files/" &  mySmartUpload.Files(0).FileName)= false then

    mySmartUpload.Save("/admin_files")

    else

    mySmartUpload.SaveAs("/admin_files/1"&  mySmartUpload.Files(0).FileName)

    end if

     if Err then 

      response.write (Err.description)

     else

    image =mySmartUpload.Files(0).FileName 

   titre = mySmartUpload.Form.Item("title")

   header=mySmartUpload.Form.Item("header")

     text=mySmartUpload.Form.Item("text")

     typ="conseil"

 
   sql="insert into services_fr
(service_title,service_header,service_text,service_image,service_type)
values ('" & titre & "','" & header & "','" & text
& "','"&image&"','"&typ&"')"   

     objcon.execute sql

     response.write("Enregistr&#233; avec succ&#232;s")

     objcon.close

  end if



Dans ce cas, si "unficher.ext" existe d&#233;j&#224;, le nouveau va &#234;tre
enregistr&#233; sous le nom "1unfichier.ext". (bien entendu tu peux mettre
ce que tu veux &#224; la place...)
Bien entendu le script tel qu'il est l&#224; ne permet d'uploader qu'un seul fichier &#224; la fois.

Mais bon, on fait ce qu'on peut ...


Nurgle 
Il est plus ais&#233; d'&#234;tre sage pour les autres que pour soi-m&#234;me ! (La Rochefoucauld)

perle007 · Answer

hola!!
merci beaucoup pour ton aide maintenant je rencontre un autre souci qui est :
j'ai comme tu le sais deja 4 champs j'ai le champ "r&#233;sumer" et le champ "corp" qui sont des textarea je ve ke lors de l'enregistrement dans la base de donn&#233;e que j'ai genre 

et non pas aaaaaaaaa aaaaaaaaa            aaaaaaaaa

tu vois ce que je veux dire et bien sur lors de l'affichage aussi que j'ai aaaaaaaaaa
aaaaaaaaaa
aaaaaaaaaa 
 
merci beaucooooooooouuuuuuuuuuuup

cs_Nurgle · Answer

j'ai pas bien compris la question...



Pour ce qui est du script que je viens de te donner, il est loin d'&#234;tre
parfait et a plusieurs petits probl&#232;me moyennement important.

Tel qu'il est l&#224; il marche, mais pour l'instant n'essaye pas d'enregistrer 3 fichiers qui ont le m&#234;me nom  !

Si j'ai le temps ce weekend, je te donnerais un script qui marche vraiment bien .



Et si tu pouvais reformuler ta question sur le textarea, parce que l&#224;...

I don't understand 


Nurgle 
Il est plus ais&#233; d'&#234;tre sage pour les autres que pour soi-m&#234;me ! (La Rochefoucauld)

perle007 · Answer

alors pour ce qui est pour le truc pour renommer l'image je viens de trouver un code qui marche a la perfection voila je te le donne :

<% 
Dim mySmartUpload 
Dim intCount 
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload") 
mySmartUpload.DenyPhysicalPath = True 
response.Write(titre) 
mysmartupload.save ("/admin_files")
mySmartUpload.MaxFileSize = 51200 
mySmartUpload.Upload 
anciennom=mySmartUpload.files.item(1).FileName 
Set Fichier = Server.CreateObject("Scripting.FileSystemObject") 
ctr=nom 
vrai=0 
decoupe=split(anciennom,".",-1,1)
nom=decoupe(0) 
extension=decoupe(1) 
do while vrai=0 
if Fichier.FileExists(Server.mappath("../admin_files/")&""&nom&Cstr(ctr)&"."&extension) then 
ctr=Cint("0"&ctr)+1 
else 
vrai=1 
end if 
loop 
Set Fichier=nothing 
mySmartUpload.files.item(1).SaveAs ("../admin_files/")&nom&Cstr(ctr)&"."&extension 
  if Err then 
   response.write (Err.description) 
  else 
   titre = mySmartUpload.Form.Item("title") 
   header=mySmartUpload.Form.Item("header")
   text=mySmartUpload.Form.Item("text")
   image=nom&Cstr(ctr)&"."&extension
   typ="conseil"  
   sql="insert into services_fr (service_title,service_header,service_text,service_image,service_type) values ('" & titre & "','" & head & "','" & text & "','"&image&"','"&typ&"')" 
   objcon.execute sql
   response.write("Enregistr&#233; avec succ&#232;s") 
   objcon.close 
  end if 
%>
--------------------------------------------------------------------------
maintenant le souci que j'ai c'est que quand j'ecris un texte qui est assez long avec des espaces sur la base de donn&#233;e il m'enregistre les espaces et il me les affiche lors de l'affichage genre : aaaaa     aaaaa     aaaa sachant que le texte lors de la saisi est clean c'est a dire :aaaaaaaa           
          aaaaaaa
         aaaaaaa
et si je met des entr&#233;e il les prend encharge (ds la saisi ) ce que je veux maintenant c'est que lors de l'enregistrement sur la BD  que le texte saisi soit super clean pour avoir un texte du genre 

aaaaaaaaaaaa
aaaaaaaaaaaa
aaaaaaaaaaaa

(au niveau de la BD)
j'espere etre claire

perle007 · Answer

bonjour

stp si tu peux me venir en aide a ce propos j'en serai ravie 

stp stp stp

merci

cs_Nurgle · Answer

c'est pas dans le BD qu'il faut faire &#231;a.

Dans la BD tu auras exactement le contenu de ton champ, avec les
espaces et les sauts de ligne ! Elle ne permet que d'enregistrer des
donn&#233;es, pas d'enregistrer la pr&#233;sentation de ces donn&#233;es.



Par d&#233;faut, le contenu sera affich&#233; de la m&#234;me mani&#232;re qu'il a &#233;t&#233;
tap&#233;, si tu dois modifier la pr&#233;sentation, justifier le texte par
exemple, tu devras utiliser le CSS.


Nurgle 
Il est plus ais&#233; d'&#234;tre sage pour les autres que pour soi-m&#234;me ! (La Rochefoucauld)

perle007 · Answer

c'est bon pour le truc de l'espace j'y suis parvenu maintenant j'ai un autre souci au niveau de l'upload de l'image je m'explique: quand je rempli mon formulaire et que je ne met pas d'image il me me une erreur lors de la decoupe 
nom=decoupe(0) 
extension=decoupe(1) 
moi au niveau de mon formulaire il se peut que l'utilisateur n'ait pas d'image a ttelecharger donc le champ image peut etre vide dans mon cas donc stp dis moi comment je peut eviter cette erreur

merci ennormement pour ton aide

cs_Nurgle · Answer

Le plus simple ce serait &#231;a :



Dim mySmartUpload 

Dim intCount 

Set mySmartUpload =  Server.CreateObject("aspSmartUpload.SmartUpload") 

mySmartUpload.DenyPhysicalPath = True 

response.Write(titre) 

mysmartupload.save ("/admin_files")

mySmartUpload.MaxFileSize = 51200 

mySmartUpload.Upload 

anciennom=mySmartUpload.files.item(1).FileName 

 if anciennom <> "" then 

Set Fichier  = Server.CreateObject("Scripting.FileSystemObject") 

ctr= nom 

vrai=0 

decoupe=split(anciennom,".",-1,1)

nom=decoupe(0) 

extension=decoupe(1) 

do while vrai=0 

if Fichier.FileExists(Server.mappath("../admin_files/")&""&nom&Cstr(ctr)&"."&extension) then 

ctr=Cint("0"&ctr)+1 

else 

vrai=1 

end if 

loop 

Set Fichier=nothing 

mySmartUpload.files.item(1).SaveAs ("../admin_files/")&nom&Cstr(ctr)&"."&extension

nouveaunom=nom&Cstr(ctr)&"."&extension

else

nouveaunom=""

end if

  if Err then 

   response.write (Err.description) 

  else 

   titre = mySmartUpload.Form.Item("title") 

   header=mySmartUpload.Form.Item("header")

   text=mySmartUpload.Form.Item("text")

   image= nouveaunom 

   typ ="conseil"  

   sql="insert
into services_fr
(service_title,service_header,service_text,service_image,service_type)
values ('" & titre & "','" & head & "','" & text
& "','"&image&"','"&typ&"')" 

   objcon.execute sql

   response.write("Enregistr&#233; avec succ&#232;s") 

   objcon.close 

  end if 



(j'ai mis en rouge les modifications)


Nurgle 
Il est plus ais&#233; d'&#234;tre sage pour les autres que pour soi-m&#234;me ! (La Rochefoucauld)

perle007 · Answer

c'est bon meci beaucouppppppppppp et pour tout 
maintenant j'ai fini le formulaire d'ajout je vais commencer celui de la modification et je commence deja a avoir des soucis genre je dois selectionner le titre a partir d'une liste de choix (combobox) et je ne trouve pas comment encore

cs_Nurgle · Answer

bonne chance pour la suite 



une petite piste pour l'utilisation des combobox :

La Balise <select /> (ASP-PHP.NET)





A+++

Nurgle 
Il est plus ais&#233; d'&#234;tre sage pour les autres que pour soi-m&#234;me ! (La Rochefoucauld)

perle007 · Answer

salut j'ai besoin d'un coup de main de ta part si cela ne te derange pas. alors voila comme je t'ai dit il faut que je fasse un formulaire avec un bouton modifier en cliquant sur modifier faudra qu'une autre form s'affiche (dans le meme formulaire) qui comporte les champs relatif au titre que l'utilisateur aura choisi au niveau de la liste deroulante. voila maintenant j'ai fais la liste déroulante a l'execution elle m'affiche le contenu de la base de donner (dans mon cas c'est le champs titre) le prb c que quand je clique sur modifier ca ne maffiche rien (sachant que j'ai creer lotr formulaire ou il devra m'afficher le reste des champs de la base relatif au titre selectionné) je ne sais pas d'ou est ce que ca viens: voila la partie de mon code : <% rs.Close Set rs=Nothing title=Request("title") if title <> "" then set rs=objcon.execute("select * from services_fr where id="&title&"") else %> <% title=request.querystring("title") set rs=objcon.execute("select service_title from services_fr") nombrechamps = rs.fields.count-1 %>

perle007 · Answer

salut!!!
alors voila une partie de mon souci s'est arranger c'est a dire que quand je selectionne le ttitre que je souhaite modifier et je clique sur le bouton modifier il m'affiche le formulaire ou il doit afficher le reste des champs (titre = ......, resum&#233;=........, corps=........., image=.....(la photo))
il ne m'affiche pas les ....... (le formulaire reste vide pourtant il doit etre remplit) merci beaucoup pour ton aide 
je souligne que c'est un site que je fais malgres moi et ma specialit&#233; c'est le design pas le developpement)
stp jatten ta reponse merci bcp

cs_Nurgle · Answer

en gros ton probl&#232;me est que, lors de la modification, les champs restent vide alors qu'ils devraient se remplir ?

On peut voir le code qui rempli ces champs ? 

Nurgle 
Il est plus ais&#233; d'&#234;tre sage pour les autres que pour soi-m&#234;me ! (La Rochefoucauld)

perle007 · Answer

bon bein c'est bon j'ai reussi a afficher les champs dans le formulaire en question chaqu'un en depondant du titre relatif 

il me reste maintenant que j'active le bouton modification je veux dire par l&#224; que quand les champs serons afficher dans le formulaire l'utilisateur proc&#233;dera a la modification il va modifier soit le titre soit le r&#233;sum&#233; soit le cops soit l'image ou tous ensemble 
j pige pas beaucoup au fait ca me parait super dur et je ne sais pas par ou commencer surtt en ce qui concerne le champ image puisque dans l'enregistrement initial il se peu qu'il n'y ait pas de photo et lors de la modification l'utilisateur va ajouter une photo donc comment est ce que je vais faire bein j'ignore completement???et s'il y'avais d&#233;ja une photo celle ci devra etre ecraser au niveau de la base de donn&#233;e et sur le dossier admin_files pour qu'elle soit remplacer par une nouvelle que l'utilisateeur va telecharger

s'il te plait j'ai grave besoin de ton aide moi et asp ca fait deux je ne le comprend pas 

merci de m'aider,j'attend ta reponse stppppp

perle007 · Answer

salut!!!!

stp j'ai vraiment besoin du code qui me servira a supprimer l'image s'il se trouve qu'il y'a une image et par la suite qu'il procede a l'upload et dans le cas contraire s'il n'y a pas de photo et que l'utilisateur veut uploader une qu'il fasse l'upload dirrectement

merci pour ton aide je serai tres ravie si tu m'aide encore une fois 
merciiiiiiiii

Deplacer une image parcouru dans un serveur

43 réponses

Votre réponse

Discussions similaires