blanda asp kåd med ASPUpload

8 svar · 218 visningar · startad av Eclipse 9 maj 2003

EclipseMedlem sedan juli 20003 825 inlägg

Trådstart9 maj 2003 15:15#1

Kan man inte blanda kod på detta viset!? Varken INSERT eller response.redirect fungerar.

Kod från index.asp:

<form METHOD="POST" ENCTYPE="multipart/form-data" ACTION="confirm.asp" CLASS="text_8pt">
  Select file: 
  <input TYPE="FILE" SIZE="40" NAME="FILE1" CLASS="text_8pt">
  <span CLASS="text_8pt"></span><br>
  <input TYPE=SUBMIT VALUE="Upload!" CLASS="text_8pt">
  [b]<input TYPE="hidden" NAME="dbaction" VALUE="upload">[/b]
</form>

Kod från confirm.asp:

<!-- #INCLUDE VIRTUAL="/admin/open.asp" -->
<%
[b]IF request("dbaction") = "upload" THEN[/b]

	Set Upload = Server.CreateObject("Persits.Upload")

	' ## SAVE FILE
	Upload.Save Server.MapPath("\files\")

	' Obtain file object
	Set File = Upload.Files("FILE1")

	If Not File Is Nothing Then
	  ' ## Build SQL INSERT statement
	  SQL = "INSERT INTO [files] (strFilename, strDescription, intFilesize) VALUES('" _
		& File.Filename & "', '" _
		& Replace(Upload.Form("DESCR"), "'", "''") & "', " _
		& File.Size & ")"

  	Conn.Execute(SQL)
  	'Response.Write "File saved."
	ELSE
	'  Response.Write "File not selected."
	END IF
[b]END IF[/b]
%>
<!-- #INCLUDE VIRTUAL="/admin/close.asp" -->
<%
response.redirect "index.asp"
%>

Jesper TMedlem sedan nov. 20017 144 inlägg

9 maj 2003 15:18#2

Borde väl funka kan man tycka. Det är kanske dumt att includa "öppna/stäng-databas", om du inte gör någon insert.

EclipseMedlem sedan juli 20003 825 inlägg

9 maj 2003 15:23#3

Det kommer mer kod...

Jesper TMedlem sedan nov. 20017 144 inlägg

9 maj 2003 15:25#4

Felmeddelande?
Har du med "on error resume next" ?

SebbeMedlem sedan jan. 20032 285 inlägg

9 maj 2003 15:25#5

Varför krångla med hiddens?

Kod från index.asp:

<form METHOD="POST" ENCTYPE="multipart/form-data" ACTION="confirm.asp?do=upload" CLASS="text_8pt">
  Select file: 
  <input TYPE="FILE" SIZE="40" NAME="FILE1" CLASS="text_8pt">
  <span CLASS="text_8pt"></span><br>
  <input TYPE=SUBMIT VALUE="Upload!" CLASS="text_8pt">
</form>

Kod från confirm.asp:

<!-- #INCLUDE VIRTUAL="/admin/open.asp" -->
<%
IF Request.QueryString("do") = "upload" THEN

	Set Upload = Server.CreateObject("Persits.Upload")

	' ## SAVE FILE
	Upload.Save Server.MapPath("\files\")

	' Obtain file object
	Set File = Upload.Files("FILE1")

	If Not File Is Nothing Then
	  ' ## Build SQL INSERT statement
	  SQL = "INSERT INTO [files] (strFilename, strDescription, intFilesize) VALUES('" _
		& File.Filename & "', '" _
		& Replace(Upload.Form("DESCR"), "'", "''") & "', " _
		& File.Size & ")"

  	Conn.Execute(SQL)
  	'Response.Write "File saved."
	ELSE
	'  Response.Write "File not selected."
	END IF
END IF
%>
<!-- #INCLUDE VIRTUAL="/admin/close.asp" -->
<%
response.redirect "index.asp"
%>

EclipseMedlem sedan juli 20003 825 inlägg

9 maj 2003 15:25#6

Nej.

Method doesn't support this property.

[r] ni postar så fort en fredag eftermiddag! svaret är inte för meddelandet ovan! systemet stänger snart! :-)

Jesper TMedlem sedan nov. 20017 144 inlägg

9 maj 2003 15:26#7

Rad?

EclipseMedlem sedan juli 20003 825 inlägg

9 maj 2003 15:27#8

response.redirect "index.asp"

[r] Äh... det är säkert nå't dumt stavfel någon stanns... Det löser sig nog! Bara ni säger att det ska fungera så är jag nöjd.

solbulleMedlem sedan mars 20015 287 inlägg

9 maj 2003 17:27#9

Jag tror inte du kan använda dig av request (form) som du gör, använd komponentens variant ( Upload.form("dbaction") )
eller gör som Sebbe visar med querystring.