日期:2014-05-16  浏览次数:21029 次

我这里的值怎么传到iframe页面之后的asp页面中?个人认为传得比较远,怎么这么遥远?啊》》》》》》》》》》》
我这里怎么把index.asp页面中的id="image<%=k%>"传到3_upload_update.asp的'image'+k+''中?

index.asp
<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("tongbao.mdb")
set rs=server.CreateObject("adodb.recordset")
rs.open"select * from xj Order By hound DESC ",conn,3,2
%>
<table>
<%dim k
k=1
do while not rs.eof
%>
<table>    
<tr><td colspan="11" bgcolor="#666666" class="STYLE1" ><iframe src="2_upload.asp"></iframe><input type="text" name="image" value="0" id="image<%=k%>"></td></tr> 这里的image<%=k%>怎么传到3_upload_update.asp页面中红色的那个部位?
</table>
    <%
k=k+1
rs.movenext
loop
%>
</table>
</center>
<%rs.close
conn.close%>

2_upload.asp

<html> <body><form method="POST" enctype="multipart/form-data" action="3_upload_update.asp">  <input type="FILE" seze="20" name="file1"> <INPUT TYPE=SUBMIT VALUE="保存">     </FORM> </BODY> </HTML>

3_upload_update.asp
<%OPTION EXPLICIT%>
<%Server.ScriptTimeOut=5000%>
<!--#include FILE="upload_5xsoft.inc"-->
<html>
<head>
<title>文件上传</title>
</head>
<body>
<%
dim upload,file,formName,formPath,iCount,filesize
set upload=new upload_5xsoft ''建立上传对象
formpath="../shujuku/picture/"
for each formName in upload.objFile ''列出所有上传了的文件
 set file=upload.file(formName)  ''生成一个文件对象
    file.FileName=year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)'重命名
     file.fileext=".bmp"
  file.SaveAs Server.mappath(formPath&file.FileName&file.Fileext)   ''保存文件
 response.write "<script language=javascript>var i=1; {(parent.document.getElementById('image'+k+'').value='../picture/"&File.FileName&file.filEext&"')}</script>"我这里的'image'+k+''怎么获取index.asp页面的id="image<%=k%>"
%>

------解决方案--------------------
引用:
<%
czz=request("czz")
 dim upload,file,formName,formPath,iCount,filesize我把这句换成<%
set czz=upload.file("czz")
 dim upload,file,formName,formPath,iCount,filesize以后,报错(0x800A01A8)缺少对象:''
……


是的,request.form获取表单数据不能调用Binayread了,upload_5xsoft这个组件要使用binaryread方法。。

获取表单数据改为用upload_5xsoft这个类实例的方法

 dim upload,file,formName,formPath,iCount,filesize
set upload=new upload_5xsoft ''建立上传对象

czz=upload.form("czz")''''''''''''''''''
formpath="../shujuku/picture/"
for each formName in upload.objFile ''列出所有上传了的文件
 set file=upload.file(formName)  ''生成一个文件对象
next
    file.FileName=year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)'重命名
     file.fileex