小弟我刚学VB不久,想知道
用什么语句能把SQL里的数据连接,
并且有哪几种方法,并说明哪一种好一点!!!!
谢谢!!!!!!!!!!!!!
用什么语句能把SQL里的数据连接,
并且有哪几种方法,并说明哪一种好一点!!!!
谢谢!!!!!!!!!!!!!
解决方案 »
- VB生成XM文件时如果给子节点添加属性
- 得到richtextbox中每行文本的行号,怎样修改行号对应的内容啊?请个位,帮忙。
- VB中用mschart控件如何能同时画出动态和静态的两条曲线
- C语言考试系统,编程题答案的处理问题
- 一个简单问题:为什么ACCESS2000查询语句中char函数不能用?
- 在vb的报表设计器中,碰到了一个问题,我的标题大于纸张的宽度,我想报表竖着打印应该怎么设计?
- VB与数据库连接出错
- 请问XCDZIP35.OCX这个控件如何使用?
- 请问 findfirst为什么不起作用了?急!!!
- 请问各位,如何使屏幕黑屏,直到我的程序演视完后!同时如何使一窗体在屏幕中平滑移动?
- ============如何读取Access表中的字段名?===========
- 我没有分了,为了这个问题最后的分也花了.我几乎用了所有能用的办法还没解决.
ADODC控件我用过,不是很好.我要的是编码!!!!!!!!!!
谢谢!!!!!!!!!!!!!!!
Dim rs As New ADODB.Recordset
cn.ConnectionString = "Provider=SQLOLEDB.1;SERVER=" & ServerName & ";DATABASE=" & DatabaseName & ";UID=" & SysUserName & ";PWD=" & SysPassword
If cn.State = 1 Then cn.Close
cn.Open
rs.Open "select * from tb ", cn, 1, 1
把工程属性的启动对象改成SUB MAIN
在工程/引用里引用MS AXTIVEX DATA OBJECTS 2。6
以下写在模块里:
public cn as adodb.connection
public rs as adodb.recordset
sub main()
Set cn = New ADODB.Connection
cn.Open "dsn=fchy;uid=sa;password=SCENERY;"
end sub
Public adoCon As ADODB.Connection
'创建ADO记录集对象
Public adoRS As ADODB.Recordset
'创建ADO命令对象
Public adoCmd As ADODB.Command
'创建ADO参数对象
Public adoPara As ADODB.Parameter
Public proCon As String
Public Sub ConnectDB()
'创建新的ADO连接对象
Set adoCon = New ADODB.Connection
With adoCon
'指明连接数据库所使用的驱动程序是SQL
.Provider = "SQLOLEDB"
'指定连接字符串
'Server是SQL Server服务器的名字---SQL SERVER的实例名(不一定是机器名)
'Uid是SQL SERVER的登录名
'Pwd是SQL SERVER的登录(如sa)的对应的密码
'Database指定在SQL SERVER数据库中已经建立的数据库名
.ConnectionString = "Server=;Uid=;Pwd=;Database="
'打开连接
.Open
End WithEnd Sub
給你看看