Foxtable(狐表)用户栏目专家坐堂 → [求助]项目发布后合并dBase文件报错


  共有2995人关注过本帖树形打印复制链接

主题:[求助]项目发布后合并dBase文件报错

帅哥哟,离线,有人找我吗?
有点色
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2016/12/29 23:36:00 [显示全部帖子]

只能导入低版本2.0的dbf文件,高版本不行。

 

你可以保存成低版本,或者保存成access、excel之类的再导入


 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/1/3 9:50:00 [显示全部帖子]

以下是引用黄训良在2017/1/2 23:03:00的发言:
请问:导出低版本的参数或方法。

 

在 vfp 命令窗口执行  COPY TO 新表名 TYPE  fox2


 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/1/5 11:49:00 [显示全部帖子]

以下是引用黄训良在2017/1/5 11:47:00的发言:
未申明copy?

 

用vfp,打开dbase文件的工具,在其命令窗口执行代码,而不是在foxtable里执行。


 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/1/5 12:01:00 [显示全部帖子]

mark 导入dbf文件

 

你直接写代码导入也可以

 

Dim dlg As new openFileDialog
If dlg.ShowDialog = DialogResult.OK Then
    Dim str_oleConn As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & FileSys.GetParentPath(dlg.FileName)  & ";Extended Properties=dBASE IV;"
    Dim ole_conn As New System.Data.OleDb.OleDbConnection(str_oleConn)
    Try
        ole_conn.Open()
       
        Dim cmd As New System.Data.OleDb.OleDbCommand("select * from " & FileSys.GetName(dlg.FileName), ole_conn)
       
        Dim reader As object = cmd.ExecuteReader()
       
        Do While reader.Read()
            If reader(0).Gettype.Name <> "DBNull" Then
                output.show(reader(0))
            Else
                output.show("空值")
            End If
           
        Loop
       
        msgbox("查询成功")
    Catch ex As Exception
        MessageBox.Show(ex.Message)
    Finally
        ole_conn.Close()
    End Try   
End If

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=72525&skin=0

 


 回到顶部