麻烦帮忙找一下下面的错误.

2005-12-25 12:46:39 145 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

【部署glm4】属性找不到、参数错误问题解决（思路：修改模型包版本）目前该问题并没有解决，但是猜测是因为vllm版本需要为0.6.4，但是目前找不到这个版本，因此只能用）0.6.3.post1替代，猜测大概率是因为版本问题导致找不到。在部署glm时，遇到了一些属性找不到、参数错误的问题，通常遇到这种问题都是因为模型包版本问题导致的，要注意模型版本是否可用。我的解决方法是将transformers版本降为4.44.0。由于vllm包较大，测试可用版本比较麻烦。阅读详情

错误提示:
Microsoft VBScript 编译器错误错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp，行242

ADODB.Recordset 错误 '800a0bcd'

BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。

/sendto.asp，行114

出错行: rs("用户名")=rs1("用户名")


<%userall=request.form("userall")
file_name=session("up_file_name") '得到附件文件名
if file_name<>"" then file_path_name="upfile/"&file_name else file_path_name="　" end if
title=trim(request.form("title"))
if title="" then response.redirect("send.asp") end if
text_all=request.form("text_all")
text_all=replace(text_all,chr(13),"<br>")
text_all=replace(text_all," "," ")
if text_all="" then text_all="　" end if
sender=session("user_name")

if userall="yes" then '发给所有人
str="select * from user where 用户类别<>'超级管理员' and 单位<>'"&sender&"'"
set rs=conn.execute(str)
revicer=""
do while not rs.eof
revicer=revicer&rs("部门")&"|"
rs.movenext
loop
dd=date
tt=time
rs.close
sql="select * from news"
rs.Open sql,conn,1,3
rs.addnew
rs("标题")=title
rs("内容")=text_all
rs("发文日期")=dd
rs("发文时间")=tt
rs("发文者")=sender
rs("接收者")=revicer
rs("附件")=file_path_name
rs.update
id=rs("ID")
session("up_file_name")=""

else '发给部分人
'取出部门人
bumeng_count=session("bumeng_count")
b=1
do while b<=bumeng_count
bumeng_n="bumeng"&cstr(b)
bumeng_str=request.form(bumeng_n)
str="select * from user where 部门='"&bumeng_str&"' and 用户类别<>'超级管理员' and 单位<>'"&sender&"'"
set rs=conn.execute(str)
do while not rs.eof
revicer=revicer&rs("部门")&"|"
rs.movenext
loop
b=b+1
loop

'选定指定人
see=request.querystring("see")
if see="user_all" then
user_all=session("user_all")
b=1
do while b<user_all
se_namen="se_name"&cstr(b)
se_str=request.form(se_namen)
if se_str<>"" then
revicer=revicer&se_str&"|"
end if
b=b+1
loop
end if

dd=date
tt=time
rs.close
sql="select * from news"
rs.Open sql,conn,1,3
rs.addnew
rs("标题")=title
rs("内容")=text_all
rs("发文日期")=dd
rs("发文时间")=tt
rs("发文者")=sender
rs("接收者")=revicer
rs("附件")=file_path_name

rs.update
id=rs("ID")
session("up_file_name")=""
end if
rs.Close

'创建签收表
set rs=server.createobject("ADODB.recordset")
sql="select * from qsnews"
rs.Open sql,conn,1,3
mysendto=split(revicer,"|",-1,1)

for each sendtoinf in mysendto
if trim(sendtoinf)<>"" then
set rs1=server.createobject("ADODB.recordset")
sql1="select * from user where 部门='"&trim(sendtoinf)&"'"
rs1.Open sql1,conn,1,3
rs.addnew
if not rs1.EOF then rs("单位")=rs1("单位")
rs("用户名")=rs1("用户名")
rs("密码")=rs1("密码")
rs("序号")=rs1("序号")
rs("发文日期")=dd
rs("签收状态")=0
rs("reid")=id
rs.update
rs1.Close
set rs1=nothing

end if
next

conn.close
back=request.querystring("back")
response.redirect(back)
%>

...全文