<%
dim id,address
id=request("id")
dim rs,sql
set rs=server.createobject("adodb.recordset")
sql="select * from zyzds where id='" & id &"'"
rs.open sql,conn,1,1
address=rs("file")
%>
<script language="vbscript">
Sub OpenFromServer()
Dim sPath
On Error Resume Next
sPath = <%=address%>
OA.OpenWebFile sPath
End Sub
</script>
请大家帮忙看一下,这段代码有什么问题?为什么sPath的值是空的? 作者:
Nothing 时间: 2011-3-4 23:38