Question

急:错误类型：Provider (0x80020005)类型不匹配。/Vcd_Add_Save.asp, 第 20 行。

<!--#include virtual="Inc/Cls_Main.ASP"-->
<%
if main.islogin=false then response.Redirect("/login.asp")
Dim ID
ID = Trim(Request.Form("id"))
if id="" then
'添加新的
sql="select * from vedio where 1=0"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,main.conn,1,3
rs.addnew
else
sql="select * from vedio where id="&id
set rs=server.CreateObject("adodb.recordset")
rs.open sql,main.conn,1,3
'修改
end if
for i=1 to 9
response.write Trim(Request.Form("T_"&i)) & "<br>"
rs(i)=Trim(Request.Form("T_"&i))
next
rs("leftnum")=Trim(Request.Form("T_5"))
'response.end
rs.update
if err then
response.Write("<script>alert('出现错误："&err.description&"');</script>")
response.end
else
response.Write("<script>alert('添加成功！');parent.location.reload();</script>")
response.end
end if
rs.close
set rs=nothing
%>
不用trim用什么啊??求教 谢谢

Answer 1

rs(i)=Trim(Request.Form("T_"&i))
这里面的Request.Form("T_"&i)没有获取到值,导致trim出错
你可以考虑不用trim

_______________________________________

如果允许该字段为空的话直接不用函数算了
不过最好还是找出那个表单为什么没传过来正确的值

Answer 2

用trim函数前，先判断一下rs(i)=Trim(Request.Form("T_"&i))的值是否为空！
这样改：
if Trim(Request.Form("T_"&i))<>"" then
rs(i)=Trim(Request.Form("T_"&i))
else
'这里写如果Trim(Request.Form("T_"&i))为空，要做的事
end if