Microsoft VBScript 编译器错误 '800a03ea' 语法错误 \conn.asp, line 9 Microsoft VBScript 编译器错误 '800a...
Microsoft VBScript \u7f16\u8bd1\u5668\u9519\u8bef \u9519\u8bef '800a03ea' \u8bed\u6cd5\u9519\u8bef /conn.asp,\u884c 3<%
Set conn=Server.CreateObject("ADODB.Connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;"&"Data Source="&Server.MapPath("Data.mdb")
%>
\u9519\u8bef\u63d0\u793a\u5f88\u6e05\u695a\u554a\u3002 11\u884c
if user== then \u6539\u6210 if user = "" then
\u8865\u5145\uff1a\u4f60\u8fd9\u662f\u5c06 vb\u8ddfjs \u8bed\u6cd5\u6df7\u6dc6\u5e76\u4e14\u5728\u6df7\u6dc6\u7684\u540c\u65f6\u8fd8\u4f7f\u7528\u9519\u8bef\u3002
\u5728vbscript\u4e2d \u662f\u6ca1\u6709\uff08\u636e\u6211\u73b0\u5728\u6240\u638c\u63e1\u7684\u77e5\u8bc6\u6765\u8bb2\uff09==\u8fd9\u79cd\u5199\u6cd5\u7684\u3002
\u800c\u5728js\u4e2d \u4e24\u4e2a\u7b49\u53f7\uff08==\uff09\u7684\u4e2d\u6587\u7ffb\u8bd1\u5c31\u662f\u201c\u7b49\u4e8e\u201d\uff1b\u800c\u4e00\u4e2a\u7b49\u53f7\uff08=\uff09\u7684\u4e2d\u6587\u7ffb\u8bd1\u5c31\u662f\u201c\u8d4b\u503c\u201d\u3002
------------------------------------------------------
\u53c8\u4ed4\u7ec6\u770b\u4e00\u4e0b\u4f60\u7684\u4ee3\u7801\uff0c\u9519\u8bef\u592a\u591a\u4e86\uff0c\u6211\u7ed9\u4f60\u6539\u4e86\u4e00\u4e0b\uff0c\u4f60\u81ea\u5df1\u5bf9\u7167\u5427\uff1a
<%
dim user,user1,qd,nn
user=request.form("name")
user1=request.form("name1")
qd=request.form("sq")
nn=request.form("pwd")
if user = "" then
response.write("\u8bf7\u8f93\u5165\u7528\u6237\u540d\uff01")
elseif user1="" then
response.write("\u8bf7\u8f93\u5165\u7528\u6237\u6635\u79f0\uff01")
elseif qd="" then
response.write("\u8bf7\u9009\u62e9\u6240\u5728\u5730\u533a\uff01")
elseif nn ="" then
response.write("\u8bf7\u8f93\u5165\u5bc6\u7801\uff01")
else
response.write ("\u4f1a\u5458\u6635\u79f0: "& user & "" )
response.write ("\u7528\u6237\u540d\u79f0: "& user1 &"" )
response.write ("\u6240\u5728\u5730\u533a: "& qd &" " )
response.write ("\u767b\u9646\u5bc6\u7801: "& nn &" " )
end if
%>
isSqlserver=0 //使用数据库类型,0=access,1=mssql
db="data/tieba123.mdb" // 数据库连接地址及名称
sql_localname = "(local)" // 数据库服务器地址
VBS中没有“//”这种注释，当然语法错误了，你把所有//换成'就行了
//使用数据库类型,0=access,1=mssql
包括下面一系列的注释都得改,VBS里面不能用双斜杠,而是用单引号
没看懂 留个脚印等到高手解决
扩展阅读：www.sony.com.cn ... paperpass免费入口 ... xboxone欧版 ... cmt3 research microsoft ... 永久免费版office办公软件 ... macbook pro最新版本 ... office365永久免费 ... www.vivo.com ... windows永久免费下载软件 ...
