编程论坛
注册
登录
编程论坛
→
VB6论坛
求一个VB如何向SQL录入数据实例
实例学习
发布于 2018-12-22 20:39, 2471 次点击
各位大侠,求下个VB向SQL录入的实例
自己弄了半天没弄出来,只有通过实例来学习了
提示:我的是VB6精简版,SQL SERVER2005
WIN7 32位
先谢过了
3 回复
#2
ZHRXJR
2018-12-23 12:17
VB6精简版,现在使用的网友没有几个,因为它的功能太少太少了,控件也少得多,希望安装 VB 6.0 企业版 SP6 的版本,不要使用VB6精简版了。
至于 Win 7 操作系统 32位的应该不是问题,VB6精简版 是不是能够连接 SQL Server 2005 ,没有试过。
在 VB 6.0 企业版 SP6 连接 SQL Server 2005 ,没有问题。
程序代码:
Dim
cnn
As
New
ADODB.Connection, RS
As
New
ADODB.Recordset
cnn.ConnectionString =
"
provider=SQLOlEDB.1;persist security info=false;data source=服务器名称或服务器的IP地址;user id=sa;Password=sa用户的登录密码;initial catalog =数据库名称
"
'
连接SQL 2005 数据库语句
cnn.Open
'
打开数据库连接
SQLM =
"
Select * From 需要录入的数据表名称
"
RS.Open SQLM, cnn,
3
,
2
RS.AddNew
RS!字段1 = Text1.Text
RS!字段2 = Text2.Text
'
.......................
RS!字段n = Textn.Text
RS.Update
RS.Close
cnn.Close
一个非常简单的录入代码,希望对你有帮助。还是希望安装 VB 6.0 企业版 SP6 的版本。
#3
wmf2014
2018-12-24 09:26
对于没有访问过sql server的电脑需要向注册表写入访问端口1434,否则无法连接服务器。
#4
huwei853
2023-05-20 16:42
RS.Open SQLM, cnn, 3, 2 请问3.2 什么意思
RS.Open SQLM, cnn, 3, 2 请问3.2 什么意思
1