--- title: "ASPUPLOAD???" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/94460-aspupload" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "Ivar" published: "2004-01-10T13:27:35.000Z" updated: "2004-01-11T12:24:44.000Z" replies: 13 views: 430 page: 1 pages: 1 language: "sv-SE" site: "webForum — webforum.nu" rights: "Upphovsrätten till varje inlägg tillhör dess författare." attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/94460-aspupload" --- # ASPUPLOAD??? ## #1 — Ivar, 2004-01-10T13:27Z ``` Hej! Varför jag kan inte spara bara information från formuläret alla vill inte lada bild(fil)? Men om jag väljer att lada bild(fil) fungerar som det ska. Kan någon se felet? Kod: <% Set Upload = Server.CreateObject("Persits.Upload") 'Upload.SetMaxSize 100000, Upload.Save(Server.MapPath("../bilder/")) Set File = Upload.Files("blob") item = Upload.form("item") description = Upload.form("description") sal= Upload.form("sal") mark= Upload.form("mark") category = Upload.form("category") ja = Upload.form("ja") price = Upload.form("price") phone = Upload.form("phone") email = Upload.form("email") stad = Upload.form("stad") password = Upload.form("password") If Not File Is Nothing Then ' Build ODBC connection string Connect = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("\db\annonser.mdb") SQL= "INSERT INTO mak (item, description,typ,markerad, category, test,price,phone,email,stad, filename,password)" SQL= "INSERT INTO items (item, description,typ,markerad, category, test,price,phone,email,stad, filename,password,lan) VALUES('" & item & "','"& description & "','" & sal &"','" & mark&"','" &category &"','"&ja& "','"&price&"','"&phone&"','"& email &"', '"&stad&"','"&File.FileName& "','"& password & "','"&lan& "')" 'SQL = SQL & " VALUES( '" & item & "','"& description & "','" & sal &"','" & mark&"','" & category &"','"&ja& "','"&price&"','"&phone&"','"& email &"', '"&stad&"','"&File.FileName& "','"& password & "')" File.ToDatabase Connect, SQL 'Response.Redirect"miten.asp" End If %> mnh /Ivar ``` Permalänk: https://www.webforum.nu/p/94460 ## #2 — @nders, 2004-01-10T13:30Z Det vore bra om du kunde ha koden inne i \[kod\]-taggarna, och inläggstexten utanför. Det blir lättare att läsa. Får du något felmeddelande? Permalänk: https://www.webforum.nu/p/1246806 ## #3 — Ivar, 2004-01-10T13:31Z Nej igen felmeddelande Permalänk: https://www.webforum.nu/p/1246807 ## #4 — Ivar, 2004-01-10T13:33Z Sorry Permalänk: https://www.webforum.nu/p/1246808 ## #5 — Ivar, 2004-01-10T17:05Z Några förslag? Permalänk: https://www.webforum.nu/p/1246909 ## #6 — @nders, 2004-01-10T17:31Z Jag använder inte aspupload själv (trivs ganska bra med ASPSmartUpload), så jag har inte möjlighet att testa tyvärr. Har du lusläst användarmanualen? Permalänk: https://www.webforum.nu/p/1246926 ## #7 — Ivar, 2004-01-10T17:55Z ja du @nders deras manual är u-begriplig och förvirrande tycker jag. Är det någon som har haft samma problem? Permalänk: https://www.webforum.nu/p/1246945 ## #8 — solbulle, 2004-01-10T18:31Z Denna rad som DU skrivit säger ju att om det inte är en fil som laddas upp så hoppa över att lägg in något i db. Ändra det. ``` If Not File Is Nothing Then ``` red. vårdade spåket en aning... :r Permalänk: https://www.webforum.nu/p/1246972 ## #9 — Ivar, 2004-01-10T18:56Z Hej solbulle det är sant du, men vad ska jag ha där då ? typ If file ="" then (eller?) Permalänk: https://www.webforum.nu/p/1246989 ## #10 — solbulle, 2004-01-10T19:26Z Gör som så att du lyfter ut hela insättningen av data till db utanför kollen om fil finnes, då lär du väl få in datan i db. Sen kollar du om filen finns, om den finns, spara den till disk. Permalänk: https://www.webforum.nu/p/1247001 ## #11 — Sebbe, 2004-01-10T19:33Z Ungefär så här tror jag solbulle menar: ``` <% Set Upload = Server.CreateObject("Persits.Upload") 'Upload.SetMaxSize 100000, Upload.Save(Server.MapPath("../bilder/")) Set File = Upload.Files("blob") item = Upload.form("item") description = Upload.form("description") sal= Upload.form("sal") mark= Upload.form("mark") category = Upload.form("category") ja = Upload.form("ja") price = Upload.form("price") phone = Upload.form("phone") email = Upload.form("email") stad = Upload.form("stad") password = Upload.form("password") ' Build ODBC connection string Connect = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("\db\annonser.mdb") strSQL= "INSERT INTO items (item, description,typ,markerad, category, test,price,phone,email,stad, filename,password,lan) VALUES('" & item & "','"& description & "','" & sal &"','" & mark&"','" &category &"','"&ja& "','"&price&"','"&phone&"','"& email &"', '"&stad&"','"&File.FileName& "','"& password & "','"&lan& "')" If NOT File Is Nothing Then File.ToDatabase Connect, strSQL Else Connect.Execute(strSQL) End If %> ``` Permalänk: https://www.webforum.nu/p/1247003 ## #12 — Ivar, 2004-01-10T20:36Z sebbe felmeddelande • Feltyp: Microsoft VBScript runtime (0x800A01A8) Object required /stf/visaa.asp, line 45 Rad 45 är SQL = SQL & " VALUES( '" & item & "','"& description & "','" & sal &"','" & mark&"','" & category &"','"&ja& "','"&price&"','"&phone&"','"& email &"', '"&stad&"','"&File.FileName& "','"& password & "')" Permalänk: https://www.webforum.nu/p/1247023 ## #13 — @nders, 2004-01-11T11:12Z Du får inte ha med file.filename då, eftersom du inte skickar upp en fil. ``` If NOT File Is Nothing Then strFileName = File.Filename End if strSQL= "INSERT INTO items (item, description,typ,markerad, category, test,price,phone,email,stad, filename,password,lan) VALUES('" & item & "','"& description & "','" & sal &"','" & mark&"','" &category &"','"&ja& "','"&price&"','"&phone&"','"& email &"', '"&stad&"','"& strFileName & "','"& password & "','"&lan& "')" ``` Permalänk: https://www.webforum.nu/p/1247260 ## #14 — Ivar, 2004-01-11T12:24Z Tack @nders funkar fint men om jag begränsar filstorleken då ska felmeddelande duka upp. Typ bilden är för stor var god och ändra storlek. Upload.SetMaxSize 10000, True if allowed Then server.transver("fel.asp") end if men det funkar inte så? Permalänk: https://www.webforum.nu/p/1247294 --- Tråden på webben: https://www.webforum.nu/amne/asp/94460-aspupload