删除记录的问题!!!

wangspring 2005-08-17 08:20:25
con=sqlconnect('yjh','sa','347424')
if con>0
*messagebox('连接成功!!!')
=sqlsetprop(con,'asynchronous',.f.)
=sqlsetprop(con,'transactions',2)
if messagebox('确定要删除这条记录吗???',36,'职工培训计划')=6
DELETE
if sqlcommit(con)>0
messagebox('删除成功!!!')
endif
else
sqlrollback(con)
messagebox('删除失败!!!')
endif
else
messagebox('连接失败!!!')
endif
sqldisconne(con)
这个是我删除按钮里写的程序,为什么删除不到远程视图和后台数据库中的数据。

提示删除成功。但是数据库中记录不少
...全文
105 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
十豆三 2005-08-17
  • 打赏
  • 举报
回复
是不是你表名(zgpx)有误,以下代码我在VFP6和VFP9下测试通过:

con=SQLCONNECT('jhz','sa','')
IF con>0
MESSAGEBOX('连接成功!!!')
=SQLSETPROP(con,'asynchronous',.F.)
=SQLSETPROP(con,'transactions',2)

IF MESSAGEBOX('确定要删除这条记录吗???',36,'职工培训计划')=6
IF SQLEXEC(con,' DELETE from bm')>0
IF SQLCOMMIT(con)>0
MESSAGEBOX('删除成功!!!')
ENDIF
ELSE
SQLROLLBACK(con)
MESSAGEBOX('删除失败!!!')
ENDIF
ENDIF
ELSE
MESSAGEBOX('连接失败!!!')
ENDIF
SQLDISCONNE(con)
wangspring 2005-08-17
  • 打赏
  • 举报
回复
con=sqlconnect('yjh','sa','347424')
if con>0
messagebox('连接成功!!!')
=sqlsetprop(con,'asynchronous',.f.)
=sqlsetprop(con,'transactions',2)

if messagebox('确定要删除这条记录吗???',36,'职工培训计划')=6
if sqlexec(con,' DELETE from zgpx')>0
if sqlcommit(con)>0
messagebox('删除成功!!!')
endif
else
sqlrollback(con)
messagebox('删除失败!!!')
endif
else
messagebox('连接失败!!!')
endif
endif
sqldisconne(con)
还是不行呀,删除失败!!!
十豆三 2005-08-17
  • 打赏
  • 举报
回复
if sqlexec(con,' DELETE form zgpx')>0

改为:

if sqlexec(con,' DELETE from zgpx')>0

你把FROM 写成 FORM 了。
wangspring 2005-08-17
  • 打赏
  • 举报
回复
con=sqlconnect('yjh','sa','347424')
if con>0
messagebox('连接成功!!!')
=sqlsetprop(con,'asynchronous',.f.)
=sqlsetprop(con,'transactions',2)

if messagebox('确定要删除这条记录吗???',36,'职工培训计划')=6
if sqlexec(con,' DELETE form zgpx')>0
if sqlcommit(con)>0
messagebox('删除成功!!!')
endif
else
sqlrollback(con)
messagebox('删除失败!!!')
endif
else
messagebox('连接失败!!!')
endif
endif
sqldisconne(con)
改成这样,连接成功了,删除失败,怎么回事???
十豆三 2005-08-17
  • 打赏
  • 举报
回复
视图名也可以,但如果视图的层次过多,就不行。
wangspring 2005-08-17
  • 打赏
  • 举报
回复
这里用的是表名,不是视图名吗?
我改过了,可以了

2,727

社区成员

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

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