以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 求助 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=43977) |
-- 作者:myzzip -- 发布时间:2013/12/19 21:20:00 -- 求助 在项目事件中Initialize 中代码如下 Dim lst As List(Of String)
为什么打开项目只创建一个表呀,不能同时创建所有表? |
-- 作者:有点甜 -- 发布时间:2013/12/19 21:26:00 -- 你的if语句用错了 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() End If If 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 If 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 |
-- 作者:myzzip -- 发布时间:2013/12/19 21:28:00 -- 这不是一个意思吗? |
-- 作者:有点甜 -- 发布时间:2013/12/19 21:35:00 -- 不一样,if then 内容1 elseif then 内容2 endif ,只会选择执行任意一个满足条件的 内容 |