关于mssql数据库的问题。请老师们帮忙看看

格格爸爸 · 发表于 2012-2-13 14:06:44

版本 2
.支持库 eGrid
服务器＝读配置项 (取运行目录 () ＋ “\sys.ini”, “server info”, “server”, “您的服务器地址”)
服务器用户名＝读配置项 (取运行目录 () ＋ “\sys.ini”, “server info”, “uid”, “您的服务器用户名”)
服务器密码＝读配置项 (取运行目录 () ＋ “\sys.ini”, “server info”, “pwd”, “您的服务器密码”)
服务器数据库＝读配置项 (取运行目录 () ＋ “\sys.ini”, “server info”, “database”, “您的数据库名城”)
.如果 (外部数据库1.打开SQL数据库 (服务器, 服务器用户名, 服务器密码, 服务器数据库, 假, ) ＝真)
显示本月 ()
.否则
信息框 (“连接失败”, 0, )
.如果结束
.子程序显示本月
.局部变量记录集, 整数型
.局部变量 sqlc, 文本型
记录集＝外部数据库1.查询 (“select count(*) from 设备 where 日期 between #” ＋到文本 (取年份 (开始日期框.今天)) ＋ “-” ＋到文本 (取月份 (开始日期框.今天)) ＋ “-” ＋ “01” ＋ “# and #” ＋到文本 (取年份 (结束日期框.今天)) ＋ “-” ＋到文本 (取月份 (结束日期框.今天)) ＋ “-” ＋到文本 (取某月天数 (取年份 (取现行时间 ()), 取月份 (取现行时间 ()))) ＋ “#”)
高级表格1.行数＝外部数据库1.读 (记录集, 1) ＋ 1
外部数据库1.关闭记录集 (记录集)
高级表格1.获取焦点 ()
这段代码是获取数据库表“设备”的记录总数。来确定高级表格的行数。可是执行到红色部分，程序就出错误了。连窗体都打不开。。。不知道为什么。日期字段的属性我设置的nvarchar
请老师们帮忙看一下吧，谢谢了！

复制代码

ctzl8 · 发表于 2012-2-13 14:06:45

我的代码：

.版本 2

.子程序连接附件数据库, 逻辑型

.如果 (_启动窗口.conn.打开SQL数据库 (fj_db_ip, fj_db_un, fj_db_ps, fj_db_k, , 真))
写日志 (“本地数据库连接成功”)
系统_处理事件 ()
返回 (真)
.否则
写日志 (“本地数据库连接失败” ＋ fj_db_ip ＋ fj_db_un ＋ fj_db_ps ＋ fj_db_k)
返回 (假)

.版本 2

.子程序 _按钮6_被单击
.局部变量 sql, 文本型
.局部变量 rs, 整数型
.局部变量 ts, 整数型

.如果真 (连接附件数据库 ())
sql ＝ “select count(id) from atta where zt=2 and mac<>'” ＋ mac ＋ “'”
rs ＝ _启动窗口.conn.查询 (sql)
.如果真 (rs ≠ 0)
ts ＝ conn.读 (rs, 1)
输出调试文本 (“有新数据” ＋到文本 (ts) ＋ “条”)

.如果真结束
_启动窗口.conn.关闭记录集 (rs)
_启动窗口.conn.关闭 ()

补充内容 (2012-2-17 10:04):
conn
就是外部数据库

铸慥啈冨 · 发表于 2012-2-13 15:56:33

http://www.3600gz.cn/thread-71288-1-1.html

大肥 · 发表于 2012-2-13 17:52:11

27.高级表格1.行数＝外部数据库1.读 (记录集, 1) ＋ 1

将后面的到整数试试

格格爸爸 · 发表于 2012-2-14 10:09:00

我以前用的access数据库。现在改成mssql了之后才出的这问题啊。
到整数的问题吧？

难倒高手 · 发表于 2012-2-14 15:04:50

我好想当一回

格格爸爸 · 发表于 2012-2-14 18:17:02

请老师们帮忙看看吧

ctzl8 · 发表于 2012-2-17 10:01:21

红色部分全是数据库，改一下变量名试试看。
我也做MSSQL，方法基本一至，没有问题。

		自动登录	找回密码
密码			注册

[已解决] 关于mssql数据库的问题。请老师们帮忙看看

最佳答案