|
方法是活的,这条路走不通就可以换条试试~
可以将你在2楼的代码封装成一个Fuction存放在外部文件(比如vbs文件),放在settings->Resources中,虽然不知道你在Action间传递那个参数的目的是什么,但这样应该也能实现你的目的吧~
例如:
Function DB(strconn,sql,fieldStr)
Set conn=createobject("Adodb.connection")
Set rst=createobject("Adodb.recordset")
conn.open strconn
rst.open sql,conn
fields = split(fieldStr,",")
For i = 0 to UBound(fields)
Environment(Trim(fields(i)))= rst(Trim(fields(i)))
Next
End Function
说一下fieldStr参数,比如这次要取表中的username,password,address三个字段,则
fieldStr = "username,password,address"
还有一点要注意,就是记得取某个字段值的时候记得要添加相应变量名的环境变量~
[ 本帖最后由 hsjzfling 于 2007-10-11 16:09 编辑 ] |
|