回 帖 发 新 帖 刷新版面

主题:帮帮忙,看看数据库连接为什么出问题啊???!!!

这次搞课程设计我做了一个商品交易管理系统(spjy),应用程序中打开事件中的数据库连接代码如下:
      sqlca.dbms="odbc"
      sqlca.autocommit=false
      sqlca.dbparm="connectstring='DSN=spjy;UID=DBA;PWD=SQL'"
      connect using sqlca;

if sqlca.sqlcode<>0 then
    messagebox("错误","数据库连接错误,请检查后重试!")
    return
end if

open(w_main)
     当运行该应用程序时,显示"数据库连接错误,请检查后重试!",不知道是为什么.
     而且入库窗口中连接的数据窗口只能显示一个空的表格(没有原始记录),但是我在数据表中定义了原始记录,为什么就连不过去呢?真搞不明白.

     另外在预览入库窗口时,当我输入完一个待添加的入库记录后,一点"确定",就会出现一个"DataWindow  Error"对话框,上面显示的内容如下:
     Database transaction information not available.
     Call SetTrans or SetTransObject function.
     "进库操作失败!"
     不知道是为什么.
     真的很犯愁啊,可就是不知道问题怎么解决.哪位大侠能帮我具体解决或指点一下吗?感激不尽!!!
     下周就要答辩了,各位帮帮忙吧!
     
     
      
[em2][em12]

回复列表 (共2个回复)

沙发

你把出错信息显示出来
在你写的if sqlca.sqlcode<>0 then
            messagebox("错误","数据库连接错误,请检查后重试!")
           return
         end if
中把messagebox()改成这样
  messagebox("错误","数据库连接错误,请检查后重试!"+sqlca.sqlerrtext)
就会显示数据库存连接错在哪里了

板凳

你后面几个问题都是数据库存连接出错引起的,数据库没连接上当然没有记录哦

我来回复

您尚未登录,请登录后再回复。点此登录或注册