Office中国论坛/Access中国论坛

标题: 关键一步 [打印本页]

作者: dragonszr 时间: 2003-10-23 23:55
标题: 关键一步
前面请教了诸位高手很多文件查找功能，现在找到这个文件后，可以让它在文本框里显示，问题是现在如何对该文件操作，例如将excel文件作为一个表导入数据库中，如何实现呢，再次请各位高手指点

[此贴子已经被作者于2003-10-23 16:07:40编辑过]

作者: ADAM 时间: 2003-10-24 00:18
1.不用代碼,用"文件"菜單上的匯入功能
2.用代碼:
DOCMD.TransferSpreadsheet acImport ,acSpreadsheetTypeExcel8 ,"匯入存放的表名","匯入檔案全名含路徑"

作者: dragonszr 时间: 2003-10-24 00:26
那段代码要已知文件路径，不是我所要的
我的目的是在通过文件浏览选定该文件，然后对刚选定的这个文件进行导入

作者: ADAM 时间: 2003-10-24 00:36
把剛選定文件的全名,賦值給一個變量
再用TransferSpreadsheet命令啊.....

作者: dragonszr 时间: 2003-10-24 00:45
我把数据库发上来，帮我改一下代码，我实在是不会，好么？？[attach]2137[/attach]

作者: ADAM 时间: 2003-10-24 00:59
把你里面的代碼改成這個樣子

Private Sub ok_click()
  Dim aa As String
  aa = Me.txt5.Value
  DoCmd.TransferSpreadsheet acImport, 5, "survey", aa, True

End Sub

這上是比較基本的,建議先看看相關入門書籍,
那樣子做起來比較容易,

作者: dragonszr 时间: 2003-10-24 01:06
谢谢，我终于知道了，好，我去看看入门书籍，能给个推荐么

作者: ADAM 时间: 2003-10-24 01:16
我從來沒看過,
都是從幫助文件上學來的
你不妨也去看看
對基礎命令了解后.
寫起來才比較順手.

作者: seaload 时间: 2003-10-24 02:05
这个相对简单了。
如果导入的excel有多个表，而且导入时表头不允许，那又该如何呢？
而且比较常见的！

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)