Question

这段很简单的调用asp函数出错在哪里？

<input name="tNo" style="width: 113px" type="text" value="<%=caldocuno()%>">

<%
function caldocuno()
linkdata
set rst=conn.execute(select brand from brand)
caldocuno=rst("docuno")
end function
%>

函数里如果直接写caldocuno=111就没问题。问题出在linkdata也就是创建conn之后的set rst=conn.execute("select b from b")。但是我在别的地方在linkdata后面也写过set rst=...，是可以正确执行的。难道set rst=conn.execute不能放在function里？

Answer 1

与linkdata有关。
再检查一下这个函数。
把include调到上面。
直接把linkdata里的语句写到linkdata的位置。

Answer 2

Function caldocuno()
Call linkdata()
Dim rst, str
Set rst = Conn.Execute("select docuno from brand")
If Not rst.Eof Then
str = rst("docuno")
Else
str = "没有数据"
End If
Set rst = Nothing
caldocuno = str
End Function
Conn必须为全局定义

追问

问题是执行到set rst那句就出错。后面直接写caldocuno=1234都没用。

追答

linkdata
应该是Sub linkdata()
如果是Function linkdata()又没有定义Conn为全局的话就出错了

追问

是sub linkdata。conn如何定全局？
之前执行set rst成功是form submit触发的，这个失败的是value的函数触发的，其他都一样。难道触发不同set rst就不一样？

追答

Dim Conn, ConnStr
上面的不在任何Sub或者Class或者Function里就是全局定义

追问

dim conn了还是没用。
同时把你的代码贴过来还是出错。问题还是出在set rst=（在这句后面写上on error resume next还是出错，之前写on error就没事了）
错误都是提示服务器端出错。

Answer 3

这个要看你怎么创建表格的。在创建td的时候，加上你的随机数。

追问

跟表格有什么关系呢？跟随机数又有什么关系呢？
出错是set rst=conn.execute