DTS有个对象,在你的机器上装个SQL SERVER就可以引用了。用这个对象你就可以进行数据转换了。

解决方案 »

  1.   

    DTS有个对象,在你的机器上装个SQL SERVER就可以引用了。用这个对象你就可以进行数据转换了。
      

  2.   

    假如已知EXCEL文件格式,则不用DTS也可以
    两个CONNECTION分别打开SQL和EXCEL然后导入即可,反过来也一样。
      

  3.   

    To:subzero(赘姆烂壳) 
    你的方法速度太慢了
    TO:ltp3() 
    能否具体地谈谈或者发给我源代码万分感谢!
      

  4.   

    用SQLDMO库包含的对象吧,引用Microsoft SQLDMO Object Library。里面有很多东东可以使用。具体可以看帮助。呵呵!
      

  5.   

    heyijpn:
    我现在出差在外地,手上没资料。最好是你自己查查资料和帮助,或则等我回去后再回复你。
      

  6.   

    TO:ltp3() 
    To everyone:
    我真的很着急啊怎么办?
      

  7.   

    你已经会了嘛!
    SQL用Select ... from Sheet1$ where ...
    可以选出所要的EXCEL记录,其它嘛你应该知道的。
    原理是你把EXCEL也作为一个数据表,用ADO方式或DAO方式打开就行了。
      

  8.   

    表名要这样写 就可以 [sheet1$]
      

  9.   

    如何实现excel文件导入SQL Server
    答案正确,有源码相送.
      

  10.   

    如何实现excel文件导入SQL Server
      

  11.   

    Private Sub test()
    Dim cn As New ADODB.Connection
        Str_cn = "provider=msdasql;driver={MICROSOFT EXCEL DRIVER (*.XLS)};dbq=c:\0109.XLS"
        cn.Open Str_cn
        Strsql = "select * into Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=custom;Data Source=YourServer].[t14] from [0109$]" 
        cn.Execute Strsql, , adCmdText
    cn.Close
    Set cn = Nothing
    End Sub
      

  12.   

    Private Sub test()
    Dim cn As New ADODB.Connection
        Str_cn = "provider=msdasql;driver={MICROSOFT EXCEL DRIVER (*.XLS)};dbq=c:\0109.XLS"
        cn.Open Str_cn
        Strsql = "select * into [Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=custom;Data Source=YourServer].[t14] from [0109$]" 
        cn.Execute Strsql, , adCmdText
    cn.Close
    Set cn = Nothing
    End Sub
      

  13.   

    Bardo(巴顿)你的方法出现错误:
    实时错误 -214721117911
    [Microsoft][ODBC EXCEL 驱动程序]不能更新,数据库或对象为只读
    请你告诉我为什么??
    如何实现啊!! 各位大虾帮忙啊!救命! 
      

  14.   

    真的无解吗?各位CSDN的高手??中国软件界的高手??
      

  15.   

    heyijpn(小何)
    Bardo(巴顿)
    我试了将xls文件导入access的代码
    用不用中文都提示说不能识别**$文件名.
    怎么加事?