Foxtable(狐表)用户栏目专家坐堂 → 求助,帮忙看下是什么问题


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

主题:求助,帮忙看下是什么问题

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


加好友 发短信
等级:幼狐 帖子:159 积分:1283 威望:0 精华:0 注册:2013/5/15 14:11:00
求助,帮忙看下是什么问题  发帖心情 Post By:2013/12/19 15:02:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:$}2x12b8swg14~uno69{q~9.jpg
图片点击可在新窗口打开查看

BeforeConnectOuterDataSource 事件中代码如下

Dim lst As List(Of String)
lst = Connections("Tckj").GetTableNames
If lst.Contains("MINE") =False Then  '判断没有包含这个表
    Dim cmd As New SQLCommand
    cmd.C
    cmd.CommandText = "CREATE TABLE [dbo].[MINE] ([_Identify] [int] IDENTITY (1, 1) NOT NULL ,[_Locked] [bit] NULL ,[_SortKey] [numeric](28, 0) NULL ,[MINE] [nvarchar] (16) COLLATE Chinese_PRC_CI_AS NULL ) ON [PRIMARY]"
    cmd.ExecuteReader()
ElseIf

 

打开项目提示错误


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/12/19 15:04:00 [只看该作者]

Connections("Tckj") 你是否有声明这个外部数据源

另外这类SQL语句应该使用 cmd.ExecuteNonQuery() 

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


加好友 发短信
等级:幼狐 帖子:159 积分:1283 威望:0 精华:0 注册:2013/5/15 14:11:00
  发帖心情 Post By:2013/12/19 15:22:00 [只看该作者]

Dim lst As List(Of String)
lst = Connections("nwnd").GetTableNames
If lst.Contains("MINE") =False Then  '判断没有包含这个表
    Dim cmd As New SQLCommand
    cmd.C
    cmd.CommandText = "CREATE TABLE [dbo].[MINE] ([_Identify] [int] IDENTITY (1, 1) NOT NULL ,[_Locked] [bit] NULL ,[_SortKey] [numeric](28, 0) NULL ,[MINE] [nvarchar] (16) COLLATE Chinese_PRC_CI_AS NULL ) ON [PRIMARY]"
    cmd.ExecuteNonQuery()
ElseIf lst.Contains("取气明细") =False Then
    Dim cmd As New SQLCommand
    cmd.C
    cmd.CommandText = "CREATE TABLE [dbo].[取气明细] ([_Identify] [int] IDENTITY (1, 1) NOT NULL ,[_Locked] [bit] NULL ,[_SortKey] [numeric](28, 0) NULL ,[类型] [nvarchar] (32) COLLATE Chinese_PRC_CI_AS NULL ,[日期] [datetime] NULL ,[客户] [nvarchar] (32)COLLATE Chinese_PRC_CI_AS NULL ,[数量] [float] NULL ,[单价] [float] NULL ,[单位] [nvarchar] (5) COLLATE Chinese_PRC_CI_AS NULL ,[金额] [float] NULL ,[编号] [nvarchar] (32) COLLATE Chinese_PRC_CI_AS NULL ) ON [PRIMARY]"
    cmd.ExecuteNonQuery()
end if

 

还是报错呀!找不到原因在哪?

数据源我都建好啦!


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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/12/19 15:23:00 [只看该作者]

报什么错.

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


加好友 发短信
等级:幼狐 帖子:159 积分:1283 威望:0 精华:0 注册:2013/5/15 14:11:00
  发帖心情 Post By:2013/12/19 15:25:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:@0}}04aoh5zp09lr~(m6un.jpg
图片点击可在新窗口打开查看

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/12/19 15:25:00 [只看该作者]

上例子吧

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/12/19 15:26:00 [只看该作者]

先判断一下 集合是否为空再执行下面的代码看看

if lst isnot nothing then

end if

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


加好友 发短信
等级:幼狐 帖子:159 积分:1283 威望:0 精华:0 注册:2013/5/15 14:11:00
  发帖心情 Post By:2013/12/19 15:27:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:天然气进销存软件.rar


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


加好友 发短信
等级:幼狐 帖子:159 积分:1283 威望:0 精华:0 注册:2013/5/15 14:11:00
  发帖心情 Post By:2013/12/19 15:31:00 [只看该作者]

还是不行

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/12/19 15:32:00 [只看该作者]

开发者密码?

 回到顶部
总数 13 1 2 下一页