可以完全可以,
你只要ADO对象,
dim cm as command
dim cn as connect
cn.open "连接字串"
set cm.activeconnect=cn
cm.sql="查询语句"
cm.excute
就OK了
你只要ADO对象,
dim cm as command
dim cn as connect
cn.open "连接字串"
set cm.activeconnect=cn
cm.sql="查询语句"
cm.excute
就OK了
解决方案 »
- 如何通过窗体句柄获取对应进程的名字
- ●◆▲ 我希望有偿请人帮我设计代码或提供已开发好的代码,这不行吗?难道只能给大家送积分?
- 请问VB可以通过http访问远程服务器数据库吗?(ACCESS AND SQLSERVER?)
- 请详细讲讲ShellExcute的几个参数
- vb6+paradox7的问题!
- 紧急求助:在VB + Excel 方式的打印报表中,怎么控制cell中的元素居中显示?
- 要上传一文件,要求基于HTTP协议,想利用socket发送消息的形式处理。怎么做?
- 向须序文件写信息的异常问题?(莫明奇妙的问题!)
- 填字游戏源代码,地址如下!
- 有关BEA Tuxedo的问题,怎么启动服务,还有怎么与client建立连接??
- 如何在一个小的图片框显示大一点的图?
- 窗体中显示html文档用什么控件?
“insert into table2”之类的。
祝你好运:)
Sure.
Of cause.
Option Explicit
Public conn As ADODB.Connection
Sub Main()
Set conn = New ADODB.Connection
Dim sql As String
sql = "dbq=" & App.Path & "\db\sms.mdb;Driver={Microsoft Access Driver (*.mdb)}" '连Access数据库
'sql = "Driver={SQL SERVER};Server=(local);UID=sa;PWD=;Database=sms" '连SQL数据库
conn.Open sql
Form3.Show
End Sub