ASPupload - Fel

@nders skrev:

Du borde få samma felmeddelande med den koden du postade senast, eftersom objektet Upload inte har metoden SaveAsVirtual.

Okej, men vilket objekt har metoden SaveAsVirtual då? :P

@nders skrev:

Det är filobjektet som har den metoden, inte "huvudobjektet". Så, var kör du "Upload.SaveAsVirtual"?

Nu är det så att jag har inte gått något svindyrt programmerargymnasium eller högskola så jag fattar faktsikt inte ett skvatt av vad du har sagt dina senaste trådar.. =D

Hmm, att jag är så otydlig? :o

Filobjektet kallar du för File. Detta objekt har metoden SaveAsVirtual. Du hade rätt kodrad på fel ställe i denna kod:

<%
Set Upload = Server.CreateObject("Persits.Upload.1")
Mappen = "../photo.streetwize.se/prod/"&Request.QueryString("kat")&"/"
Mapp = Server.MapPath(Mappen)
X=0
For Each File in Upload.Files
X=X+1
File.Name = Request.QueryString("kat")&"-"&Request.QueryString("name")&"-"&X
Next
[b]File.SaveAsVirtual(Mapp&""&Request.QueryString("kat")&"-"&Request.QueryString("name")&"-"&X)[/b]
%>

Den raden skall vara så, fast ovanför Next, så den utförs för varje fil som laddades upp.

Hmmm, testade koden, och den gick igenom helt utan felmeddelanden. MEN inga filer laddades upp och dessutom så försvann all information från Upload.Form. :S

Set Upload = Server.CreateObject("Persits.Upload.1")
Mappen = "../photo.streetwize.se/prod/"&Request.QueryString("kat")&"/"
Mapp = Server.MapPath(Mappen)
X=0
For Each File in Upload.Files
X=X+1
File.SaveAsVirtual(Mapp&""&Request.QueryString("kat")&"-"&Request.QueryString("name")&"-"&X)
Next

prodNAMN = Upload.Form("prodNAMN")
prodMARKE = Upload.Form("prodMARKE")
prodTYP = Upload.Form("prodTYP")
prodSTORLEK = Upload.Form("prodSTORLEK")
prodFARG = Upload.Form("prodFARG")
prodANTAL = Upload.Form("prodANTAL")
prodPRISSV = Upload.Form("prodPRISSV")
prodPRISEU = Upload.Form("prodPRISEU")
prodBESKSV = Upload.Form("prodBESKSV")
prodBESKEU = Upload.Form("prodBESKEU")

prodARTNR = Upload.Form("prodARTNR")
prodBILDLITEN = Upload.Form("prodBILDLITEN")
prodBILDSTOR = Upload.Form("prodBILDSTOR")

SQL = "INSERT INTO prodBASIC(prodNAMN,prodMARKE,prodTYP,prodSTORLEK,prodFARG,prodANTAL,prodPRISSV,prodPRISEU,prodBESKSV,prodBESKEU,prodARTNR,prodBILDLITEN,prodBILDSTOR) Values('"&prodNAMN&"','"&prodMARKE&"','"&prodTYP&"','"&prodSTORLEK&"','"&prodFARG&"',"&prodANTAL&","&prodPRISSV&","&prodPRISEU&",'"&prodBESKSV&"','"&prodBESKEU&"','"&prodARTNR&"','"&prodBILDLITEN&"','"&prodBILDSTOR&"')"
Response.Write(SQL)

Gav
INSERT INTO prodBASIC(prodNAMN,prodMARKE,prodTYP,prodSTORLEK,prodFARG,prodANTAL,prodPRISSV,prodPRISEU,prodBESKSV,prodBESKEU,prodARTNR,prodBILDLITEN,prodBILDSTOR) Values('','','','','',,,,'','','','','')

@nders skrev:

Nu har jag kikat på koden för sparandet, och är det inte så, att man måste köra metoden Save innan man kan komma åt formulärvariabler?

Du måste köra metoden Save (utan att ange mapp) först, sedan kan du använda alla variabler och spara filer.

Allt detta står i manualen, för övrigt.

edit: och snälla, använd [kod]-taggar i dina inlägg.

mvh

Hur menar du?

dummy

Set Upload = Server.CreateObject("Persits.Upload.1")
Mappen = "../photo.streetwize.se/prod/"&Request.QueryString("kat")&"/"
Mapp = Server.MapPath(Mappen)
X=0
For Each File in Upload.Files
X=X+1
File.Save()
File.SaveAsVirtual(Mapp&""&Request.QueryString("kat")&"-"&Request.QueryString("name")&"-"&X)
Next

Trodde [kod]-taggarna bara var för PHP

Set Upload = Server.CreateObject("Persits.Upload.1")
[b]Upload.Save[/b] ' som du gjorde förut för att populera upload.form
Mappen = "../photo.streetwize.se/prod/"&Request.QueryString("kat")&"/"
Mapp = Server.MapPath(Mappen)
X=0
For Each File in Upload.Files
X=X+1
File.SaveAsVirtual(Mapp&""&Request.QueryString("kat")&"-"&Request.QueryString("name")&"-"&X)
Next

[kod]-taggarna använder man för att generell kod ska visas bra. [php]-taggarna använder man för php.

Okej, nu får jag ett felmeddelande att The Path parameter for the MapPath method must be a virtual path. A physical path was used.

Vad är det för skillnad på Virtual och Physical Path?

Fysisk sökväg: c:\inetpub\wwwroot\foo\bar\
Virtuell sökväg: \foo\bar\

Om du använder SaveAsVirtual ska du alltså (givetvis) använda en virtuell sökväg, inte en fysísk, så då behöver du inte använda Server.Mappath.

Perfekt! Nu funkar de jättebra! Tack så jättemycket för att du har stått ut med alla min frågor!

Varsågod. :)