請教。
解决方案 »
- 请教:对access 2000的一个表,同时用两个recordset去操作,可以吗?
- VB的大小设置问题,在线等待~~
- mschart中,如何改变柱状图的柱宽,以及如何隐掉其中的横竖网格线
- 怎样在我的VB程序里直接终止其他应用程序的运行?
- flexcell问题
- 请问当运行我的程序时,怎么屏蔽系统的所有热键。
- "XXXXXx"指令引用的"XXXXX"内存,该内存不能为"read".为什么?
- 请问如何将程序中的多个类封装到DLL中?
- 利用API函数模拟鼠标点击.有几个菜鸟级问题.
- 求助
- 我在窗体上放了一个OLE控件,但希望它的空白区域和窗体完全自动吻合。既:随着窗体的拉伸,能自动变化。
- 有一个类似网页超级链接的问题
要调用可以ADO调用里的数据
备份可以用SQL.DEMO
工程--->引用--->Microsoft ActiveX Data Object 2.x(版本号) Dim CN As New ADODB.Connection '定义数据库的连接
Dim Rs As New ADODB.Recordset CN.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\NWIND.MDB;Persist Security Info=False"
CN.Open Rs.CursorLocation = adUseClient
Rs.Open "select * from employees", CN, adOpenDynamic, adLockBatchOptimistic Set DataGrid1.DataSource = Rs
用Scripting.FileSystemObject把它复制成另外的文件
strSrc = "aaa.mdb" '源文件名
strTag = "bbb.doc" '目标文件
If scrGetFile.FileExists(strSrc) = True Then
scrGetFile.MoveFile strSrc, strTag
End If