webForumDet fria alternativet

Fel i upload-kod

ASP

13 svar · 203 visningar · startad av Josef

Medlem sedan mars 20023 561 inlägg
Frågan#1

Jag får inte den här koden att fungera. Någon som vet var felet ligger?

...
	ElseIf Request.QueryString("stage") = 3 Then
		Set Upload = Server.CreateObject("Persits.Upload.1")
		Upload.Save Server.MapPath("../images/yachts")
		yachtID = CInt(Trim(Request.QueryString("yachtID")))
		descr = UpLoad.Form("descr")
		
		For Each File in Upload.Files
			[b]File.SaveAs now() & ".jpg"[/b]
		Next

		'strSQL = "INSERT INTO images(path, yachtID, descr) VALUES('" & filepath & "', " & yachtID & ",'" & descr & "');"
		'objConn.Execute strSQL,,128
		%><table cellspacing="0" cellpadding="2" width="400" class="borders">
			<tr class="trheader">
				<td>Task complete</td>
			</tr><tr class="white">
				<td>File uploaded to server.<br></td>
			</tr>
		</table><%
		Set Upload = Nothing	
		
	End If
...

Felmeddelande:

Persits.Upload.1 error '800a001a' 

The parameter is incorrect. 

/new/admin/images.asp, line 144
Medlem sedan mars 20023 686 inlägg
#2

Måste fråga, Kan man ha: Request.QueryString("stage") = 3 Then

Utan " "

Och jag har för mig att det räcker med att skriva Now istället för Now()

Medlem sedan mars 20023 561 inlägg
#3

Ja, det kan man.
Det här med now. Jag har alltid skrivit now() fast det gör nog ingen skillnad.

Medlem sedan mars 20023 686 inlägg
#4

Josef skrev:

Ja, det kan man.
Det här med now. Jag har alltid skrivit now() fast det gör nog ingen skillnad.

Testa utan (), man vet ju aldrig ;)

Medlem sedan mars 20023 561 inlägg
#5

Tyvärr medialabs, samma resultat.

Medlem sedan mars 20023 686 inlägg
Medlem sedan mars 20023 561 inlägg
#7

Måste tyvärr säga att jag inte blev speciellt mycket klokare med dom länkarna. :(

Jag vill alltså bara byta namn på den filen jag laddar upp.

Medlem sedan mars 20023 561 inlägg
#8

Det fungerar när jag inte byter namn på filen men så fort jag försöker byta namn så säger den ifrån. :(

Medlem sedan mars 20015 287 inlägg
#9

Du måste väl lägga in sökvägen i den strängen också?
typ:

	ElseIf Request.QueryString("stage") = 3 Then
		Set Upload = Server.CreateObject("Persits.Upload.1")
		Upload.Save 'Server.MapPath("../images/yachts")
		yachtID = CInt(Trim(Request.QueryString("yachtID")))
		descr = UpLoad.Form("descr")
		
		For Each File in Upload.Files
			File.SaveAs Server.MapPath("../images/yachts")& "/" & now() & ".jpg"
		Next
Medlem sedan mars 20023 561 inlägg
#10

Jag får samma fel. :(

Medlem sedan mars 20015 287 inlägg
#11

Vilken rad pekar felet på? Samt är sökvägen rätt till mappen, den finns?

Medlem sedan mars 20023 561 inlägg
#12
For Each File in Upload.Files
	[b]File.SaveAs Server.MapPath("../images/yachts")& "/" & now() & ".jpg"[/b]
Next

Filen laddas tydligen upp, fast under sitt ursprungliga namn.

Medlem sedan mars 20015 287 inlägg
#13

Det kan inte vara så simpelt att vi ska ta och luta / åt andra hållet.... \ ?
Filen hamnade i rätt mapp i alla fall alltså?

Medlem sedan mars 20023 561 inlägg
#14

Tyvärr var det inte så enkelt. Men som sagt, bilden laddas upp fast under orginalnamnet, hur nu det går ihop.

724 ms totalt · 4 externa anrop · v20260731065814-full.a51de22e
122 ms — deklarationer (db)
0 ms — hämta statistik (cache)
134 ms — hämta tråd, inlägg och bilagor (db)
587 ms — ändringar (db)