网页一： <html><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><title>无标题文档</title></head> <body><form action='2.asp' method='post'> <p> <input type='file' name='upfilename'> </p> <p> <input name="text1" type="text" id="text1"> </p> <p> <input type='submit'> </p></form></body></html> 网页二：2.asp <% Function GetFileName(ByVal strFile) If strFile <> "" Then GetFileName = mid(strFile,InStrRev(strFile, "\")+1) Else GetFileName = "" End If End function strFileName = Request.Form("upfilename") If strFileName<>"" Then response.Write(getfilename(strfilename)) end if response.write request.Form("text1")%>
评论