<%@language="vbscript" codepage="65001"%>
<!DOCTYPE html PUBLIC"-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transtional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html/html;charset=utf-8"/>
</head>
<body>
<p>你的Web服务器正在工作。Your Web server is working.<br/></p>
<%
MySelf=server.mappath("./")&"/userinfo.mdb"
'创建一个FileSystemObject对象实例
Set MyFileObject=Server.CreateObject("Scripting.FileSystemObject")
If MyFileObject.FileExists(MySelf) Then
Response.Write("数据库文件已存在!<br/>")
Else
Set Catalog_object=Server.CreateObject("ADOX.Catalog")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("userinfo.mdb")
Catalog_object.Create(connstr)
Set Catalog_object=Nothing
Response.Write("1.创建数据库文件userinfo.mdb成功<br/>")
set conn=server.CreateObject("adodb.connection")
'连接MS Access
conn.Open connstr
If conn.state=1 Then
response.write("2.数据库连接成功<br/>")
On Error Resume Next
table_name="users" '获取上页传过来的表名
SQL = "CREATE TABLE "&table_name&"(id counter, username varchar(20),password varchar(12),sex varchar(6),qq varchar(20),mail varchar(20),ntime varchar(20))"
conn.Execute SQL
if err.Number<>0 then
Response.Write "出错! 错误信息:"&err.description&""
else
Response.Write "建表info成功!id username password sex qq mail ntime"
end if
Else
response.write("2.数据库连接失败<br/>")
End If
End If
response.write("<br/>你的测试时间是:"&Now())
%>
</body>
</html>
无法在数据库中建立password字段的表(SQL那行,把password字段删了才可以)
答案:2 悬赏:40 手机版
解决时间 2021-02-10 04:53
- 提问者网友:黑米和小志
- 2021-02-09 10:00
最佳答案
- 五星知识达人网友:天凉才是好个秋
- 2021-02-09 11:30
关键字 + []
全部回答
- 1楼网友:归鹤鸣
- 2021-02-09 12:47
可能pwssword是关键字,用[]或者“”将其括起来试一下
再看看别人怎么说的。
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯