to liuri

roman_y 2003-01-24 10:27:21
刚才的方法开始的时候好用,但是关闭工作区之后再进去告诉"在当前工作区中没有打开的表"怎么回事
检索的click:
a=sqlconnect("cdxk","roman","yzg9940330")
IF a>0
sqlexec(a,"select kecheng_id,kecheng_daima,kecheng_mingcheng,renkejiaoshi_daima,kecheng_xingzhidaima from db_kecheng","linshi")
CursorSetProp("tables","db_kecheng","linshi")&&开始逐行提示上边的东西
CursorSetProp("KeyFieldList","id","linshi")
CursorSetProp("updatablefieldlist","id,kecheng_daima,kecheng_mingcheng,renkejiaoshi_daima,kecheng_xingzhidaima","linshi")
CursorSetProp("updatenamelist","id db_kecheng.id ,kecheng_daima db_kecheng.kechengdaima ,kecheng_mingcheng db_kecheng.kecheng_mingcheng,renkejiaoshi_daima db_kecheng.renkejiaoshi_daima,kecheng_xingzhidaima db_kecheng.kecheng_xingzhidaima","linshi")
CursorSetProp("sendupdates",.t.,"linshi")
thisform.grd.recordsource="linshi"
thisform.refresh
ENDI
...全文
24 20 打赏 收藏 转发到动态 举报
写回复
用AI写文章
20 条回复
切换为时间正序
请发表友善的回复…
发表回复
roman_y 2003-01-27
  • 打赏
  • 举报
回复
是数据源连接的错误,我现在已经解决了,但还是有些不明白,为什么出现连接错误之后数据连接句柄的返回之还大于0呢
roman_y 2003-01-27
  • 打赏
  • 举报
回复
我发现问题的所在了,不是别的原因
roman_y 2003-01-24
  • 打赏
  • 举报
回复
不是,是退出vfp环境之后就不行了,我没有刻意关闭它
liuri璇玑 2003-01-24
  • 打赏
  • 举报
回复
关闭工作区?
你在哪里关闭工作区,是不是关闭后又调用了表哪
roman_y 2003-01-24
  • 打赏
  • 举报
回复
好吧,也只能这样了,到时候我查到告诉你!1
liuri璇玑 2003-01-24
  • 打赏
  • 举报
回复
反正工作区没打开表,问题应该出在
sqlexec(a,"select * from db_kecheng","linshi")

自己查吧
roman_y 2003-01-24
  • 打赏
  • 举报
回复
在sqlexec()之前都执行了,之后的
sqlexec(a,"select * from db_kecheng","linshi")
CursorSetProp("tables","db_kecheng","linshi")
CursorSetProp("KeyFieldList","id","linshi")
CursorSetProp("updatablefieldlist","id,kecheng_daima,kecheng_mingcheng,renkejiaoshi_daima,kecheng_xingzhidaima","linshi")
CursorSetProp("updatenamelist","id db_kecheng.id ,kecheng_daima db_kecheng.kechengdaima ,kecheng_mingcheng db_kecheng.kecheng_mingcheng,renkejiaoshi_daima db_kecheng.renkejiaoshi_daima,kecheng_xingzhidaima db_kecheng.kecheng_xingzhidaima","linshi")
CursorSetProp("sendupdates",.t.,"linshi")
thisform.grd.recordsource="linshi"
每行的“linshi”都会提示同样的问题
liuri璇玑 2003-01-24
  • 打赏
  • 举报
回复
都执行了,那它在哪里提示"在当前工作区中没有打开的表"
roman_y 2003-01-24
  • 打赏
  • 举报
回复
对,我写错了,改成
a=sqlconnect("cdxk","roman","yzg9940330")
IF a>0
MESSAGEBOX("sucess!!")
sqlexec(a,"select * from db_kecheng","linshi")
Messagebox("sucess1")
thisform.grd.recordsource="linshi"
Messagebox("sucess2")
thisform.refresh
Messagebox("sucess3")
ELSE
RETURN
ENDI
用最笨蛋的调试方式,调试都执行了呀
liuri璇玑 2003-01-24
  • 打赏
  • 举报
回复
select ,kecheng_mingcheng,renkejiaoshi_daima,kecheng_xingzhidaima from db_kecheng

第一个逗号应该没有吧
roman_y 2003-01-24
  • 打赏
  • 举报
回复
那则么办呢?
a=sqlconnect("cdxk","roman","yzg9940330")
IF a>0
MESSAGEBOX("sucess!!")
sqlexec(a,"select * from db_kecheng","linshi")
Messagebox("sucess1")
thisform.grd.recordsource="linshi"
Messagebox("sucess2")
thisform.refresh
Messagebox("sucess3")
ELSE
RETURN
ENDI

每步骤都执行了!!!!呀
liuri璇玑 2003-01-24
  • 打赏
  • 举报
回复
那肯定没执行,否则数据工作期中就有linshi了
roman_y 2003-01-24
  • 打赏
  • 举报
回复
数据工作其中没有任何表
roman_y 2003-01-24
  • 打赏
  • 举报
回复
这句话肯定是执行了,我试过了。
但是怎么样打开工作去看有没有这个表呢〉?
liuri璇玑 2003-01-24
  • 打赏
  • 举报
回复
检查这句是否正确执行了,打开你的工作区,看里面是不是有这个表

sqlexec(a,"select ,kecheng_mingcheng,renkejiaoshi_daima,kecheng_xingzhidaima from db_kecheng","linshi")
roman_y 2003-01-24
  • 打赏
  • 举报
回复
检索的click:
a=sqlconnect("cdxk","userid","psw")
IF a>0
sqlexec(a,"select ,kecheng_mingcheng,renkejiaoshi_daima,kecheng_xingzhidaima from db_kecheng","linshi")

CursorSetProp("tables","db_kecheng","linshi")&&开始逐行提示上边的东西
CursorSetProp("KeyFieldList","id","linshi")
CursorSetProp("updatablefieldlist","id,kecheng_daima,kecheng_mingcheng,renkejiaoshi_daima,kecheng_xingzhidaima","linshi")
CursorSetProp("updatenamelist","id db_kecheng.id ,kecheng_daima db_kecheng.kechengdaima ,kecheng_mingcheng db_kecheng.kecheng_mingcheng,renkejiaoshi_daima db_kecheng.renkejiaoshi_daima,kecheng_xingzhidaima db_kecheng.kecheng_xingzhidaima","linshi")
CursorSetProp("sendupdates",.t.,"linshi")
thisform.grd.recordsource="linshi"
thisform.refresh
ENDI

在运行的时候停留在所有的cursorsetprop(,"linshi")处,说“linshi”这个临时表“在当前的工作区中没有打开的表”,这与临时表有关系吗?
我是想将符合条件的原表中的数据检索到临时表“linshi”中,然后将改正的数据重新返回原表中,但是就出现这个毛病了
liuri璇玑 2003-01-24
  • 打赏
  • 举报
回复
改正:看是出在哪一句代码上
liuri璇玑 2003-01-24
  • 打赏
  • 举报
回复
啊,怎么会有这种事,你自己用调试器跟踪一下,看是出在那一句代码上
roman_y 2003-01-24
  • 打赏
  • 举报
回复
不是,是我关了vfp之后重新打开运行就不行了
liuri璇玑 2003-01-24
  • 打赏
  • 举报
回复
退出vfp环境之后?
退出VFP了程序还能运行

是不是在你结束程序的过程中出现此提示

程序中有没有使用close all/close data all 之类的命令

2,749

社区成员

发帖
与我相关
我的任务
社区描述
VFP,是Microsoft公司推出的数据库开发软件,用它来开发数据库,既简单又方便。
社区管理员
  • VFP社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧