说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

高手呢?都到哪里去了,难道没有人可以帮我的忙嘛?(有关数据库与vb的问题)!!

编辑:说三道四文库 发布时间:2017-11-18 02:30
HTML文档下载 WORD文档下载 PDF文档下载
在vb 中,我要删除时要先找到那个号码,可是要在sql 里的表table1找到那个号码,我使用adodc来引用表中的数据的,不是用的ODBC的,我是这样写的
del = InputBox("请输入要删除的号码", "删除")
Dim rstable1 As ADODB.Recordset
Set rstable1 = New ADODB.Recordset
 rstable1.Open "select * FROM table1 WHERE table1.number=", del
 If rstable1.RecordCount > 0 Then
  rstable1.Delete
 End If
可是就是不行,对了,在插入时要先查询表里是否已有这个号码,如果有,则不能插入,且号码是在一个text框里输入的,这一段程序应该怎么写?实在搞不定,就快要叫作业了,帮帮忙阿!!
1: if not rstable1.eof then rstable1.Delete

2: rs.open "select ..."
   if rs.eof then 
      rs.AddNew
....
   end if
del = InputBox("请输入要删除的号码", "删除")
dim cnn as adodc.connection
Dim rstable1 As ADODB.Recordset
dim ssql as string
set cnn=new connection
cnn.open
Set rstable1 = New ADODB.Recordset
ssql="select * FROM table1 WHERE table1.number='" & del &"'"
rstable1.Open ssql,cnn
if not rstable1.eof then
rstable1.Delete adAffectCurrent

end if
对Apple的写法的一些补充。
dim cnn as adodc.connection 应为ADODB.Connection吧。
由于提问人的用ADODC控件的,不是用ODBC
所以
cnn.open可改为cnn.open adodc.connectionstring

可是我在vb 中试了,就是不太行啊,她老说我出错阿,我都没择了
把 rstable1.Delete 改为  rstable1.Delete adAffectCurrent 就可以了.

rstable1.Open "select * FROM table1 WHERE table1.number=" & del

rs.filter="number=号码"
if rs.recordcount>0 then 号码已存在
rstable1.Open "select * FROM table1 WHERE table1.number=" + del,,,cmdtext
可视化:图像的主题色提取算法,是不是太高端了? 不利于写出好代码的15个职场因素 GPU Saturday技术沙龙:分享异构计算新技术及应用 微软隐藏最深的秘密武器之一——Visual Studio可作为Python IDE 历时六月,Qt 5.1正式版终于面世! HTML5全硬件加速游戏引擎:Sphinx正式公测 专访“Monster Blade”创始人:无需营销,百万下载背后的秘密 Twitter实时分析平台主要合作伙伴Dataminr:让用户不再错过重要的推文 OpenStack、OpenNebula、Eucalyptus、CloudStack社区活跃度比较 XOR的黄色大象:Erasure Code为Hadoop节省数据恢复带宽 竞争将越来越激烈:戴尔或也进军可穿戴计算市场 新技术:可直接在人脑播放广告 编程调试和诊断的五大规则 70%开发者:对现有应用推广和广告并不满意 四种方案:将OpenStack私有云部署到Hadoop MapReduce环境中 扩展PHP的五个简单技巧,让单服务器并行支撑30000用户 硅谷为什么无法复制 PubNub+Cloudinary:简单几步快速搭建实时图片分享应用 影响互联网行业的十大API(信息图) Hadoop+GPU强强联手的性能探索 Eurora获最节能超算殊荣,中国天河2号位列第31 程序员的野心:让GPU像CPU一样运行 Gungho热潮正在逐渐消退? Thalmic创始人专访:穿戴式体感设备MYO背后的开发故事 移动周报:GSMA各种神器,Qt 5.1,Android 4.3,本周惊喜多多! 奇虎360Web平台部基础架构团队访谈:开源线上数据库中间件Atlas 化繁为简:UC优视发布“UC+”开放平台战略 从40亿美元到10亿美元 Hulu的美梦是否又一次成为泡影? 百度开发者俱乐部第六期:BAE3.0开放内测 云编程马拉松启动 微软宣布将于今年9月30日正式关闭MSN TV服务 程序员不应该再犯的五大编程错误 有关PXE技术,大虾请进 为什么我创建dialog时总是失败?? 数据窗口求和问题 三个小问题 【求助】【ZJU1504】那位能花点时间看看我的代码 如何实现类似vc的可视化拖拉形成界面功能? repeater控件的ItemTemplate模板问题!不容忽视!!! 怎样在自己的程序中备份数据库!!!??? 谁知道哪里有《杀手的童话》电影下载? 有谁知道用VC6在没有服务器端程序的情况下,如何通过账号操作远程SQL数据库. 散分!! 回复被删除,信誉分被扣! 请VFP高手帮我! mysql如何连接java,菜鸟求救!!! 有关win32 api 的问题 使用字典或者数组的问题(急) 电脑装不上xp了,急急急!那位大侠救救我! 如何使用WebLogic的LDAP服务,最好有相关文档和教材,拜谢 再问安装程序制作:我实在一点都不知道! 从哪开始啊,装了install 。。。。 想作一个阻止IE弹出窗口的程序,谁有例子? 3d游戏引擎中的关键的图形图象技术(特别是新的)有哪些? pb高手请进(送分题) 我不懂汇编 SendMessage(ClientPanel->Handle, WM_KEYUP, VK_CONTROL, 0);第三个参数是什么意思? 哪位大哥用过PXE? 上传到服务器的站点出错啊??Global.asax vb+asp.net????????? 怎样让我自己生成的菜单响应消息,并且知道所选的是哪一个菜单? 如何实现“有条件”数据绑定? WriteFile函数写大于4G的文件不成功,请教高手!急 请教高手,关于鼠标响应! 谁来给我举一个回调函数的例子,越详细越好。 DLL全局变量的理解,指导一下,看对不对,谢谢! 500分求助:怎么在windows的user control中加一个参数 java 难题 为什么硬盘不能Format了。大侠们帮忙啊!!! 那位是MS SQL数据库的高手帮帮忙 怎么把int 233 格式位 '0000233' 作好的网页如何让别人能搜到你,帮我呀 如何在vb中通过程序获取计算机一系列硬件信息? 为什么硬盘不能Format了。大侠们帮忙啊!!! OUTLOOK不能发邮件问题!请进! C++Builder高级应用求助!!! 质问斑竹:是谁删了《立法会第一立法案:水源小斑竹选举法》 高分提问! 如何让dbCombobox能接受手动输入值和从下拉框中提取值并存? 和刚才那问题一样,高分! 简单问题 有谁会 我想用treeview,它和outline有什么区别?谁有treeview的例子? 菜鸟问题。 一个建议,赞同者跟贴,请班主置顶并考虑。 菜鸟求教(2) ATL开发出的COM组件封装了ADO功能,在本机执行可以连接数据库,而远程调用COM则连接失败,请大家指点。 西汉时期,王国问题的解决是在什么时期(选择题)西汉时期,王国问题的解决是在什么时期()a.汉高祖 b.汉文帝 c汉景帝 d.汉武帝为什么不选a 西汉王国问题是什么? 别了 不列颠尼亚获了什么奖 中外朝制度是解决什么矛盾 大道之行,天下为公,英语怎么翻译 一定要完整的回答 嬴弱是啥意思? 嬴具体是指什么物种? 一衣带水的水是哪里? 什么是量子理论? 量子理论都有什么?全一些. 媒体揭秘美国监听手段:大使馆屋顶材料美无人机操作员:像僵尸一样执行任务 “罗莎”向偏西方向移动 东部地区雾霾杭州小区取消固定车位引争执 一位大伯杭州大妈100岁生日 家庭四世同堂齐法国总理呼吁民众避免使用暴力手段来解美无人机操作员:遥控飞机阿富汗杀人 杭州国际马拉松赛今天上午开跑 景区单委内瑞拉总统谴责推特强删其推特粉丝媒体揭秘美国监听手段:大使馆屋顶材料美无人机操作员:操纵飞机在阿富汗杀人中国房地产行业向绿色智慧时代转型传统肉制品企业金锣发力环保:SPRA中国2015年经常账户顺差20589温格谈克圣:足球界的詹姆斯-迪恩里贝里:我想在拜仁当青训教练卢卡斯:距离伤愈已不遥远抗战殉国的川军最高将领 现在却无人记YOYO的书单 篇十:MONSTER你锁骨的一朵花,我肩上的一匹野马金禅解盘:找出自己的问题,让你离财富iPhone都出mini版本了,猛禽
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘