高手呢?都到哪里去了,难道没有人可以帮我的忙嘛?(有关数据库与vb的问题)!!
在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框里输入的,这一段程序应该怎么写?实在搞不定,就快要叫作业了,帮帮忙阿!!
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框里输入的,这一段程序应该怎么写?实在搞不定,就快要叫作业了,帮帮忙阿!!
...全文
相关推荐
VB5DB-DLL问题
很多VB程序,拷到其他电脑不能用,缺VB5DB.DLL问题
VB小例子(帮人家一个忙)
帮论坛朋友一个忙: http://bbs.csdn.net/topics/392276725
VB如何与ACCESS数据库连接(多种方法总结)
VB如何与ACCESS数据库连接VB如何与ACCESS数据库连接VB如何与ACCESS数据库连接VB如何与ACCESS数据库连接VB如何与ACCESS数据库连接
VB使用OLE DB连接SQL Server数据库
摘要:VB源码,数据库应用,人事,管理系统 VB6使用OLE DB连接SQL Server数据库,程序调试说明: 步骤: 1:将程序拷贝到机器上,去掉所有文件的只读属性。 2:将目录data下的RSDAGLXT.mdf和RSDAGLXT_log.ldf文件拷贝到SQL Server 2000的“MSSQL”->“data”目录下. 如果没有安装Sql Server,请先安装Sql Server,安装SQL SERVER 2000数据库时,在身份安全验证机制选项中 必须要选择“Windows和Sql server混合安全验证机制。SA的密码设置为空。如果您已经安装好了
VB与各数据库的几种连接方式
主要是DAO和ADO与Access、DBF、Excel、Oracle、SQLserver等数据库的连接方法。合适初学者!


数据库(包含打印,安装,报表)
