help - passing parameters
I'm doing a search and opening a selected file on page 1 of my .asp program. The problem is
that I can't figure out how to pass the file name variable to page 2 for display on my web
page.
This is pg. 1:
<FORM ACTION="0106UploadFile.asp" METHOD="post" ENCTYPE="multipart/form-data">
<CENTER><BR><BR>
File: <input TYPE="File" NAME="SelectedFile"><BR><BR>
<input TYPE="Submit" VALUE="Upload the File">
</CENTER>
</FORM>
and this is Pg. 2:
<%
Dim objFSO, objTextFile, selectedfile
Set objFSO = CreateObject("Scripting.FileSystemObject"
' Open the file
Set objTextFile = objFSO.OpenTextFile(Server.MapPath("selected file")
Do While Not objTextFile.AtEndOfStream
Response.Write objTextFile.ReadLine
Loop
objTextFile.Close
Set objTextFile = Nothing
Set objFSO = Nothing
%>
- Brian
I'm doing a search and opening a selected file on page 1 of my .asp program. The problem is
that I can't figure out how to pass the file name variable to page 2 for display on my web
page.
This is pg. 1:
<FORM ACTION="0106UploadFile.asp" METHOD="post" ENCTYPE="multipart/form-data">
<CENTER><BR><BR>
File: <input TYPE="File" NAME="SelectedFile"><BR><BR>
<input TYPE="Submit" VALUE="Upload the File">
</CENTER>
</FORM>
and this is Pg. 2:
<%
Dim objFSO, objTextFile, selectedfile
Set objFSO = CreateObject("Scripting.FileSystemObject"
' Open the file
Set objTextFile = objFSO.OpenTextFile(Server.MapPath("selected file")
Do While Not objTextFile.AtEndOfStream
Response.Write objTextFile.ReadLine
Loop
objTextFile.Close
Set objTextFile = Nothing
Set objFSO = Nothing
%>
- Brian