Microsoft VBScript 运行时错误 (0x800A000D)类型不匹配: '[string...

aa=request.form("aa")bb=request.form("bb")cc=request.form("cc")dd=request.form("dd")ff=request.form("ff")ee=dateadd("m",-3,dd)set rs=server.createobject("adodb.recordset")sql="select * from test"rs.open sql,conn,1,3 rs("aa")=aa rs("bb")=bb rs("cc")=cc r...

把哪里错误贴出来呢?

那是C写的程序出错的事，显卡驱动被破坏了，重装显卡驱动就可以了。先在设备管理器里把驱动卸载，再安装最新驱动。

仔细查看title 与xinghao的类型 与你传过来的 值是不是类型不一样

<a href='aaa.asp?<%=s2%>&varpage=...s2也不能这么传啊，应该是a=1&b=2&c=3这种样子，你现在是a=1 and b=2...铁定不行

在上下文中没有定义 diserror() 方法或函数.如果是定义了一个有返回值的函数,试试用一个变量接收函数返回的值.

H_Core=rs("H_Core")改成 If IsNull(rs("H_Core")) Then H_Core = ""Else H_Core = CStr(rs("H_Core"))End if

没看到对Application("Talk")赋值的句子，不是太好判断，应该是这个a不是个数组，所以不能使用ubound 你可以先直接使用Application("Talk") 输出数据，如果没有问题的话，表明Application("Talk") 是数组，给a赋值时发生了错误 声明一下a：dim a() 再试试 ...

set rst2=server.CreateObject("adodb.recordset")rst2.Open "select * from style where style1='"& xh &"';",con rst2("access5")=1 rst2.update rst2.close con.close