IT天空

 找回密码
 加入我们

手机号码,快捷登录

搜索

[求助] 数据库无法创建对象~~~~

[复制链接]
intelspirit 发表于 2018-8-7 16:35:39 | 显示全部楼层 |阅读模式

本帖最后由 intelspirit 于 2018-8-7 16:39 编辑
  1. Func data($mdb_data_path, $tblname)
  2.         If Not FileExists($mdb_data_path) Then
  3.                 $newMdb = ObjCreate("ADOX.Catalog")
  4.                 $newMdb.Create("Provider=Microsoft.Jet.OLEDB.14.0; Data Source=" & $mdb_data_path)
  5.                 $newMdb.ActiveConnection.Close ;建数据库
  6.                 $addtbl = ObjCreate("ADODB.Connection")
  7.                 $addtbl.Open("Provider=Microsoft.Jet.OLEDB.14.0; Data Source=" & $mdb_data_path)
  8.                 $addtbl.Execute("CREATE TABLE " & $tblname)
  9.                 $addtbl.Close ;建表

  10.                 $addfld = ObjCreate("ADODB.Connection")
  11.                 $addfld.Open("Provider=Microsoft.Jet.OLEDB.14.0; Data Source=" & $mdb_data_path)
  12.                 $addfld.Execute("ALTER TABLE " & $tblname & " ADD id identity(1, 1) primary key,name char ,pass char ,qq int,e_mail char") ;id identity(1, 1) primary key为自动编号和主键
  13.                 $addfld.Close ;建列表名
  14.                 MsgBox(64, "提示", "建立数据库成功", 5)
  15.         Else
  16.                 MsgBox(64, "提示", "你已经建立了一个数据库了", 5)
  17.         EndIf
  18. EndFunc   ;==>data
复制代码
  1. The requested action with this object has failed.:
  2. $newMdb.Create("Provider=Microsoft.Jet.OLEDB.14.0; Data Source=" & $mdb_data_path)
  3. $newMdb^ ERROR
复制代码




最近访问 头像模式 列表模式
yuhomesheng 发表于 2018-8-7 16:59:05 | 显示全部楼层

活跃 7637| 技术 47| 互助 66| 钻石 20

1.png

自己看吧,程序要以32位运行就不会出错

评分

参与人数 1互助 +5 收起 理由
iSkye + 5 赞一个!

查看全部评分

您需要登录后才可以回帖 登录 | 加入我们

本版积分规则

intelspirit

2663

活跃

0

技术

0

互助
签到任务
最火的业界新闻
  • 小米MIX 3宝石蓝/故宫特别版首发开售:3599
  • Intel Sunnycove高性能平台首秀:新微架构
  • 金立债权人达成初步共识:进行破产重整
  • QLC来了 你的SSD购买法则还适用吗?
  • 329元!悦米机械键盘104键发布:Cherry红轴
  • 4秒下载250MB!Verizon、AT&T公开演示5G
  • iPhone在中国遭遇禁售令:或促使苹果高通言
  • 为独立显卡拼了!Intel挖走AMD GPU技术大牛
  • 25万次P/E擦写:绿芯推出工业级超耐久SLC固
  • 华为nova 4部分配置曝光:6.4寸极点屏、390
炫酷的硬件Show
  • 振华SUPER FLOWER 铜皇450W 铜牌电源
  • 比小更小,Mini-STX装机
  • 华擎X99E-ITX + 银欣ML06 装机记
  • 最强双路泰坦硬管水冷 制作流程
  • 银欣FT02,双路E5工作站
  • 迟到的定制机箱小钢炮清理灰尘
  • 乔思伯UMX1 Plus,小巧的家用综合主机
  • 分体水冷第二弹-Inwin 805 infinity
  • 第一次DIY硬管水冷~~
  • 樱桃MX6.0 青轴 机械键盘 开箱
有趣的美图分享
  • 可怜的鸭嘴兽......
  • 论字写得有多丑!还有谁?
  • 2019给自己定个小目标
  • 如果男朋友有这种朋友你怎么看?
  • 你要爱就爱我的全部!
  • 我只是勾断了一个包带
  • 千万不要让爸爸妈妈养宠物
  • 被监视了
  • 回家让爸爸签字
  • 请尊重设计师!
关注官方微信
快速回复 返回顶部 返回列表