<% Server.ScriptTimeout = 100000 %> <% Set rstSimple = cnnSimple.Execute("SELECT * FROM new_contenu") Do While Not rstSimple.EOF Set fs = Server.CreateObject ( "Scripting.FileSystemObject" ) fichier = rstSimple.fields("idnews") & ".jpg" repertoire = "news_global/" chemin = Server.MapPath(repertoire & fichier) If fs.FileExists (chemin) then Response.Write fichier 'req = "UPDATE whois SET photo = "& rstSimple.fields("id") & " WHERE id=" & Trim(rstSimple("id")) & " and prenom = " & Trim(rstSimple("prenom")) 'req = "UPDATE whois SET photo=1 where id=1 " 'Response.Write req 'Set rs = conn.Execute(req) Else ' fichier = rstSimple.fields("id") req = "UPDATE new_contenu set photo= "& "'news/0.jpg'" & " where idnews=" & Trim(rstSimple.fields("idnews")) Response.Write req Set rs = cnnSimple.Execute(req) %>
<% End if rstSimple.MoveNext Loop rstSimple.Close Set rstSimple= Nothing %>