Avatar billede henrik61 Nybegynder
17. oktober 2004 - 18:28 Der er 3 kommentarer og
2 løsninger

Update med aspSmartUpload

Hej
Hvad gør jeg forkert. Jeg har et script hvor jeg laver en insert med aspSmart, men når jeg vil lave en update vil den ikke skrive til databasen, men den vil gerne uploade billedet til mappen.
Når jeg udskriver min SQL-string se den således ud:

UPDATE billede SET tekst = 'Mere pop', SET billede = 'begynder2.jpg' WHERE id = 7

Upload script:
<%
if Request.ServerVariables("REQUEST_METHOD") = "POST" then

      On Error Resume Next
          '  Object creation
          Set upload = Server.CreateObject("aspSmartUpload.SmartUpload")
   
          'Upload filerne til memory
          upload.Upload
        sId = upload.Form("id")
          strTekst = upload.form("tekst")
 
 
        For each file In upload.Files 
            filnavn =  file.FileName       
              '  Save the files with his original names in a virtual path of the web server
              '  **************************************************************************
        file.SaveAs(server.mappath("Pic/" & file.FileName))       
    Next
      '  Trap errors
          If Err Then
            Response.Write("<b>Wrong selection : </b>" & Err.description)
          End If

      'Gem filnanvet i databasen
      if filnavn <> "" then
        Set Conn = Server.CreateObject("ADODB.Connection")
        DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
        DSN = DSN & "DBQ=" & Server.MapPath("db.mdb")
        Conn.Open DSN
        SQL = "UPDATE billede SET tekst =  '" & strTekst & "', SET billede = '" &  filnavn & "' WHERE id = " & sId
        Conn.Execute(SQL)


        Conn.Close
        Set Conn = Nothing
  end if
end if
'Response.Redirect("index.asp") 
%>
Avatar billede rbl Praktikant
17. oktober 2004 - 19:19 #1
Er du sikker på at man kan splitte DSN-strengen op i 2 linier ?

Prøv:
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db.mdb")

Kommer der nogen fejlbesked ?
Avatar billede henrik61 Nybegynder
17. oktober 2004 - 20:03 #2
Jeg kan godt splitte DSN-stregen op på den måde.
Der kommer ingen fejlbeskeder.
Når jeg udskriver min SQL ser den således ud:
UPDATE billede SET tekst = 'poppopo', SET billede = 'dias31.jpg' WHERE id = 7

Jeg bruger det samme script til at lave en insert ril databasen og det virker.
insert script:
<%
   
if Request.ServerVariables("REQUEST_METHOD") = "POST" then

      On Error Resume Next
          '  Object creation
          Set upload = Server.CreateObject("aspSmartUpload.SmartUpload")
   
          'Upload filerne til memory
          upload.Upload

          strTekst = upload.form("tekst")
 
 
        For each file In upload.Files 
            filnavn =  file.FileName       
              '  Save the files with his original names in a virtual path of the web server
              '  **************************************************************************
        file.SaveAs(server.mappath("Pic/" & file.FileName))       
    Next
      '  Trap errors
          If Err Then
            Response.Write("<b>Wrong selection : </b>" & Err.description)
          End If

      'Gem filnanvet i databasen
      if filnavn <> "" then
        Set Conn = Server.CreateObject("ADODB.Connection")
        DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
        DSN = DSN & "DBQ=" & Server.MapPath("db.mdb")
        Conn.Open DSN
        SQL = "INSERT INTO billede (tekst, billede) VALUES ( '" & strTekst & "','" &  filnavn & "')"
        Conn.Execute(SQL)


        Conn.Close
        Set Conn = Nothing
  end if
end if
Response.Redirect("index.asp") 
%>
Så hvad gør jeg forkert.
Avatar billede henrik61 Nybegynder
18. oktober 2004 - 09:03 #3
Lukker
Avatar billede henrik61 Nybegynder
18. oktober 2004 - 09:05 #4
SQL = "UPDATE billede SET tekst =  '" & strTekst & "',  billede = '" &  filnavn & "' WHERE id = " & sId
Avatar billede henrik61 Nybegynder
22. november 2004 - 13:30 #5
Lukker
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester