欢迎来到Doc100.Net免费学习资源知识分享平台!
您的位置:首页 > 程序异常 >

javascrpt调试异常0x800a03ec

更新时间: 2014-01-05 00:56:09 责任编辑: Author_N1

 

javascrpt调试错误0x800A03EC
ASP服务器发现运行时错误:
错 误 码:0x800A03EC
错误代码:cn.open "Driver={SQL Server}; Server=PC-201008041235\MYSQLSERVER; Database=users; UID=sa; PWD=;"
错误描述:缺少 ';'
反复了一上午没有解决,崩溃了,请大神帮忙,多谢

<HTML> 
<BODY bgcolor='000000' text='ffffff'> 
<FONT Face='tahoma' color='ffffff'> 
<STYLE>
p { font-size=20pt ! important} 
font { font-size=20pt ! important}
h1 { font-size=64pt ! important} 
</STYLE>
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
<% 
function trace(str) { 
if(Request.form("debug") == "true")
Response.write(str); 

function Login(cn) { 
var username; 
var password;
username = Request.form("username"); 
password = Request.form("password"); 
var rso = Server.CreateObject("ADODB.Recordset"); 
var sql = "select * from users where username = '" + username + "' and password = '" + password + "'"; trace("query: " + sql );
rso.open(sql, cn);
if (rso.EOF) { 
rso.close();
%>
<FONT Face='tahoma' color='cc0000'> 
<H1> <BR> 
<CENTER>登陆失败</CENTER> 
</H1>
</BODY>
</HTML> 
<% Response.end()
return;

else {
Session("username") = "" + rso("username"); 
%> 
<FONT Face='tahoma' color='00cc00'> 
<H1> <CENTER>登陆成功<BR>
欢迎,<% Response.write(rso("Username")); Response.write( "</BODY></HTML>" ); Response.end()
return;
}

function Main() {
var username
var cn = Server.createobject( "ADODB.Connection" )
cn.connectiontimeout = 20
connstr = "Driver={SQL Server}; Server=PC-201008041235\MYSQLSERVER; Database=users; UID=sa; PWD=;"//
cn.open (connstr)
username = new String(Request.form("username"))
if(username.length > 0) { 
Login(cn); 
}
cn.close(); 

Main(); 
%>
--参考方法--
服务器端建议使用VBScript比较方便。

js是严格区分大小写的,比如Response.Write(),Request.Form,Server.Createobject,cn.Open等等
--参考方法--
发你修改过的代码看看,是不是有其他没修改到的地方
--参考方法--
少了()
//cn.Open "Driver={SQL Server}; Server=PC-201008041235\MYSQLSERVER; database=USERS; uid=sa; pwd=;"
cn.Open("Driver={SQL Server}; Server=PC-201008041235\MYSQLSERVER; database=USERS; uid=sa; pwd=;");

对象名写错了
function trace(str) { 
//if(Request.Worm("debug") == "true")
if(Request.Form("debug") == "true")

--参考方法--
不存在就是那台电脑没安装sqlserver或者配置问题不允许访问了,自己检查

MYSQLSERVER,你是mysql还是mssql,自己搞清楚是什么数据库服务器来先,然后再查找相关驱动字符串怎么写
--参考方法--
cn.Open("Driver={SQL Server}; Server=PC-201008041235\MYSQLSERVER; database=USERS; uid=sa; pwd=;");


检查下驱动,你这列写的是y,不是s,确认示例起名成这个了?
上一篇:上一篇
下一篇:下一篇

 

随机推荐程序问答结果

 

 

如对文章有任何疑问请提交到问题反馈,或者您对内容不满意,请您反馈给我们DOC100.NET论坛发贴求解。
DOC100.NET资源网,机器学习分类整理更新日期::2014-01-05 00:56:09
如需转载,请注明文章出处和来源网址:http://www.doc100.net/bugs/t/1560/
本文WWW.DOC100.NET DOC100.NET版权所有。