1,text1和text2是控件?可以直接用text1和text2调用?不需要用text1text和text2text
2、“在对应所需名称或叙述中,未找到项目”一般都是数据库字段错误,你检查一下你的UPDATE字段和数据库字段是否一致
3、rs1!借出情况= 这样的方式我没用过,但前面你用的是rs1("借出情况")的这种方式啊!
VB可通过结构化查询语言(SQL)访问数据库。
下面帮你写一个简单的过程,将学号以参数传给该过程:
Private Sub editmark(num as Integer)
'声明一个记录集
Dim rs As New ADODBRecordset
'定义一个SQL查询串
SQLStr = "select from student where id=" & num
'执行查询
rsOpen SQLStr, Conn, 3, 2
If Not rsEOF Then
rs("mark")=rs("mark")-10
end if
'更新数据库
rsupdate
End Sub
--------------------------------------------------------------
补充:
1、对于Conn提问者肯定明白,因为提问者已经说明连接部分可以忽略;
2、对于rs("mark")=rs("mark")-10 是可行的,因为通过过程参数的传递记录已经定位在某条记录上,还考虑什么转移;
3、我们回答提问者的问题应尽量简单可行,说明问题即可,无需长篇大论让提问者一头雾水,长篇大论就是“敬业”吗?
--------------------------------------------------------------
最后补充:
没有关系,我们是在讨论问题嘛!
其实,对于“vb *** 作数据库”我相信不是我们在这里举一个简单的例子能说透的。我只是想通过这个简单的例子(越简单越易让提问者搞懂),告诉提问者用SQL可以访问并 *** 作数据库,至于具体许多细节需要提问者熟悉一下SQL和VB提供的ADO,我想这也是提问者的真实意图。
另外,关于rs("mark")=rs("mark")-10在这个例子中肯定是可行的,因为学生的id肯定是唯一的(应该是数据表student的主键),不会有重复的id。
以前使用
DAO
时,Microsoft
有提供
CompactDatabase
Method
来压缩
Microsoft
Access
文件,RepairDatabase
Method
来修复损坏的
Microsoft
Access
文件,。可是自从
ADO
出来之后,好像忘了提供相对的压缩及修复
Microsoft
Access
文件的功能。
现在
Microsoft
发现了这个问题了,也提供了解决方法,不过有版本上的限制!限制说明如下:
ActiveX
Data
Objects
(ADO),
version
21
Microsoft
OLE
DB
Provider
for
Jet,
version
40
这是
Microsoft
提出的
ADO
的延伸功能:Microsoft
Jet
OLE
DB
Provider
and
Replication
Objects
(JRO)
这个功能在
JET
OLE
DB
Provider
version
40
(Msjetoledb40dll)
及
JRO
version
21
(Msjrodll)
中第一次被提出!
这些必要的
DLL
文件在您安装了
MDAC
21
之后就有了,您可以在以下的网页中下载
MDAC
的最新版本!
Universal
Data
Access
Web
Site
在下载之前先到
VB6
中检查一下,控件设定引用项目中的
Microsoft
Jet
and
Replication
Objects
XX
library
如果已经是
21
以上的版本,您就可以不用下载了!
1、新建一个新表单,选择功能表中的控件设定引用项目。
2、加入
Microsoft
Jet
and
Replication
Objects
XX
library,其中
(
XX
大于或等于
21
)。
3、在适当的地方加入以下的程序代码,记得要修改
data
source
的内容及目地文件的路径:
Dim
jro
As
jroJetEngine
Set
jro
=
New
jroJetEngine
jroCompactDatabase
"Provider=MicrosoftJetOLEDB40;Data
Source=d:\
wind2mdb",
_
'来源文件
在
DAO
360
之后,RepairDatabase
Method
已经无法使用了,以上的程序代码显示了
ADO
CompactDatabase
Method
的用法,而它也取代了
DAO
35
时的
RepairDatabase
method!
sQueryString是SQL(增删查改)语句
public
Boolean
ExecSQL(string
sQueryString)
{
SqlConnection
con
=
new
SqlConnection(ConfigurationManagerAppSettings["conStr"]);
conOpen();
SqlCommand
dbCommand
=
new
SqlCommand(sQueryString,
con);
try
{
dbCommandExecuteNonQuery();
conClose();
}
catch
{
conClose();
return
false;
}
return
true;
}
}
建立一个类,明自己取,然后调用就是了
例如:
类
BC=NEW
类();
STRING
ist="INSERT
INTO
XX(1,2,3)VALUES(A,B,C)";
BCExecSQL(ist);
就可以了
以上就是关于vb数据库的某条信息修改,查询全部的内容,包括:vb数据库的某条信息修改,查询、vb如何获取数据库的数据,并修改、怎样用vb把数据库(Access)压缩和修复等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)