VB数据库视频教程

Dim ServerAdd As String '服务器地址 (127.0.0.1)

Dim DBname As String '服务器上数据库的名称

Dim UserName As String '登录数据库的用户名

Dim UserPwd As String '登录数据库的密码

'设置连接字符串的参数

ServerAdd = Trim(TxtServer.Text) '服务器IP(192.168.1.6)

DBname = "ChanYdata" '数据库名称

UserName = "" '登录用户名

UserPwd = "" '密码

SqlCon.ConnectionTimeout = 10

SqlCon.CursorLocation = adUseClient

SqlCon.ConnectionString = "uid=" & UserName & "pwd=" & UserPwd & "driver={Sql server}server=" & ServerAdd & "database=" & DBname & "dsn=''"

教程1：李天生老师VB教程

Visual

Basic

6.0从入门到精通

教程2：30天学通Visual

Basic项目案例开发

视频教程+源码

教程3：VB入门到高级语言开发

VB6.0

程序设计视频教程

教程4：Visual

Basic范例开发大全Visual

Basic案例光盘压缩包

教程5：用多媒体学Visual

Basic

2008

视频教程

VB

2008视频教程

教程地址：

http://www.henanfilm.cn/view-2590-1.html

---