看看

寻求帮助！！！

我是用VB6.0和ACCESS编制一个职工信息管理系统。

数据源是通过数据工程中的数据环境设计器链接的。

其中有一段代码如下：

DataEnv.rsCommand1.Close
DataEnv.rsCommand1.Open "select * " & strSQL

在程序运行的时候经常会报如下的错误：“对象已经被打开！”

请求那位师兄知道这是什么原因吗？请求指导一下!!!

看过,感觉不错!要是由SQL SERVER 导入SQL SERVER 可以吗?两个表的字段是不相同的,要怎么导呢?
除了,SQL SERVER 自带的导入导出功能外,用代码要如何实现?各位帮帮忙啊!先谢了!

你将DataEnv.rsCommand1.Close
改成如下:if DataEnv.rsCommand1.State=adStateOpen then DataEnv.rsCommand1.Close
试试看啊,应该是可以通过的!

[此贴子已经被作者于2007-7-23 17:02:36编辑过]

看了就要顶！！！

学习中

Sub GetExcel()
'使用这段代码，可以打开一个Excel实例或者引用已经打开的Excel实例

Const ERR_APP_NOTRUNNING As Long = 429
On Error Resume Next
Set MyXL = GetObject(, "Excel.Application")
If Err = ERR_APP_NOTRUNNING Then
Set MyXL = New Excel.Application
End If
MyXL.Application.Visible = True
End Sub

编译错误 提示用户定义类型未定义

什么原因，请高手指点阿

[此贴子已经被作者于2007-7-31 21:13:08编辑过]

ok

要是来一个excel转到sql server 2005  的就更好了

引用一下Excel库