以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]关于导入  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=60539)

--  作者:ypp1420
--  发布时间:2014/11/26 15:18:00
--  [求助]关于导入

我在编程的时候,导入一个Excel文件 ,用的是打开文件对话框,导入制定文件,代码编号后 导入时候提示:SELECT 子句中包含一个保留字、拼写错误或丢失的参数,或标点符号不正确。

下面是代码:

  • Dim dlg As New OpenFileDialog \'定义一个新的OpenFileDialog
    dlg.Filter= "excel文件| *.xls" \'设置筛选器
    If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
        Dim ip As New Importer
        ip.SourcePath = dlg.FileName \'指定数据文件
        ip.SourceTableName = "材料领用表" \'指定要导入的表
        ip.NewTableName ="材料领用表" \'导入后的表名
        ip.Import()
    End If

哪里有错误,请高手指点。谢谢!


--  作者:有点甜
--  发布时间:2014/11/26 15:22:00
--  
Dim dlg As New OpenFileDialog \'定义一个新的OpenFileDialog
dlg.Filter= "excel文件| *.xls" \'设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
    Dim ip As New Importer
    ip.SourcePath = dlg.FileName \'指定数据文件
    ip.Format = "Excel"
    ip.SourceTableName = "材料领用表$" \'指定要导入的表
    ip.NewTableName ="材料领用表" \'导入后的表名
    ip.Import()
End If

--  作者:ypp1420
--  发布时间:2014/11/26 16:11:00
--  
谢谢!
--  作者:ypp1420
--  发布时间:2014/11/26 16:43:00
--  

复制进代码后还是显示:运行错误

.NET Framework 版本:2.0.50727.5472
Foxtable 版本:2014.11.11.1
错误所在事件:
详细错误信息:
SELECT 子句中包含一个保留字、拼写错误或丢失的参数,或标点符号不正确。
请高手给调试一下,在线等!


--  作者:有点甜
--  发布时间:2014/11/26 16:45:00
--  

 肯定你的excel的表名有错

 

ip.SourceTableName = "材料领用表$" \'指定要导入的表


--  作者:ypp1420
--  发布时间:2014/11/26 16:49:00
--  
我再试试,谢谢甜甜版主!
--  作者:ypp1420
--  发布时间:2014/11/26 16:52:00
--  

我的表名是:"材料领用表"  把名字改成:"材料领用表$" 也不行!让版主费心了,真心感谢!


--  作者:有点甜
--  发布时间:2014/11/26 16:54:00
--  
你去看你的excel里面的表名名字,可能叫 sheet1
--  作者:ypp1420
--  发布时间:2014/11/26 16:59:00
--  
好了,谢谢版主!真心感谢!