Aspsmart upload problem

6 svar · 577 visningar · startad av Boorg 22 jan. 2007

BoorgMedlem sedan okt. 2004409 inlägg

Trådstart22 jan. 2007 20:03#1

Jobbar förnärvarande på en dator utan iss och kan därför inte se felmedelanden. Är det någon som kan se ifall jag har missat något enkelt?

   Dim mySmartUpload
   Dim file
   Dim intCount
   intCount=0
        
   Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
	mySmartUpload.Upload

	For each file In mySmartUpload.Files
	   If not file.IsMissing Then
	         file.SaveAs("bilder/" & w & "/" & file.FileName)
		 Connect.Execute("INSERT INTO sk (Namn,Bild,Text) Values('" & w & "','" & file.FileName & "','" & Request.Form("Text") & "') ")
	End If
	Next

@ndersMedlem sedan juni 200032 967 inlägg

23 jan. 2007 04:07#2

SaveAs vill nog ha en komplett sökväg, använd server.mappath.
Text är ett reserverat ord i i stort sett alla dbms, byt namn på fältet.
Du kan inte använda request.form, använd uploadkomponentens metod för att hämta formulärfältsvärden istället.
Det heter IIS. ;-)

BoorgMedlem sedan okt. 2004409 inlägg

23 jan. 2007 05:33#3

Får det ändå inte att funka...

   Namn = replace(Request.QueryString("w"), "'", "''")
   Info = replace(Request.Form("Info"), "'", "''")
	
   Dim mySmartUpload
   Dim intCount
    Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
      mySmartUpload.Upload
      mySmartUpload.Save(Server.MapPath("bilder/" & Namn & "/" & Bild))

   Connect.Execute("INSERT INTO sk (Namn,Bild,Info) Values('" & Namn & "','" & file.FileName & "','" & Info & "') ")

Även denna testad

Dim mySmartUpload
   Dim file
   Dim intCount
   intCount=0
        
   Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
	mySmartUpload.Upload

	For each file In mySmartUpload.Files
	   If not file.IsMissing Then
	         file.SaveAs(Server.MapPath("bilder/" & Namn & "/" & file.FileName))
  		 Connect.Execute("INSERT INTO sk (Namn,Bild,Info) Values('" & Namn & "','" & file.FileName & "','" & Info & "') ")
	End If
	Next

Även om jag tar bort raden när jag lägger in det i databasen, altså bara lägger upp en bild...

Denna sida ligger på cliche och det står att dom ska ha aspsmart på deras hemsida...

@ndersMedlem sedan juni 200032 967 inlägg

23 jan. 2007 07:25#4

På vilket sätt funkar det inte då?
Felmeddelande?

BoorgMedlem sedan okt. 2004409 inlägg

23 jan. 2007 18:25#5

Det är det som är det trista.. har ju inte iis... så jag får inget felmedelande...

@ndersMedlem sedan juni 200032 967 inlägg

23 jan. 2007 18:41#6

Men alltså... Hur kan du veta att det inte fungerar då?

doggelitoMedlem sedan juni 20003 076 inlägg

23 jan. 2007 20:40#7

Kan ingenting om aspsmartupload men jag vet att man inte får använda request.form i alla fall!

Info = replace(Request.Form("Info"), "'", "''")

borde vara

Info = replace(mySmartUpload.Form("Info"), "'", "''")

och flyttas ner under raden: mySmartUpload.Upload

Och du behöver inte ha tillgång till iis för att få se felmeddelanden.
Blir det fel så visas dem annars har du "friendly http errors" ikryssat i din browser (ändras under inställningar).