VB.net如何在数据库中新建表

没有写完吧

德钦网站建设公司成都创新互联,德钦网站设计制作，有大型网站制作公司丰富经验。已为德钦上1000+提供企业网站建设服务。企业网站搭建\外贸网站建设要多少钱，请找那个售后服务好的德钦做网站的公司定做！

Try

sqlcom.ExecuteNonQuery()

Catch ae As SqlException

msgbox("fail")

End Try

用vb.net 怎样建立一个mdb数据库及一张表

首先在项目的VB.NET界面，使用菜单【项目】--【添加引用】--【COM】

选择  Microsoft ADO Ext. 2.x for DDL and Security

然后单击【确定】，完成引用。

完整代码如下：

Imports ADOX

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

'创建空的access数据库文件--数据库文件.mdb，密码为123

Dim Mycat As Catalog = New Catalog()

Mycat.Create("Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Engine Type=5;Data Source= 数据库文件.mdb;Jet OLEDB:Database Password=123")

'以下代码创建一个名为“实验数据表”

Dim MyTable As ADOX.Table = New ADOX.Table         '定义新表

MyTable.Name = "实验数据表"    '表命名

'给表“实验数据表” 创建一个字符串字段，字段名“姓名”

MyTable.Columns.Append("姓名", , ADOX.DataTypeEnum.adWChar)

'给表“实验数据表” 创建一个整数字段，字段名“学号”

MyTable.Columns.Append("学号", ADOX.DataTypeEnum.adInteger)    '追加一个数字型字段

'给字段“学号”创建一个主键“PimaryKey_Field”        

MyTable.Keys.Append("学号", ADOX.KeyTypeEnum.adKeyPrimary, "学号")

Mycat.Tables.Append(MyTable) '把所有的新字段追加到表

MyTable = Nothing

Mycat = Nothing

End Sub

End Class

临时表有关问题，怎么创建一个基于VB的临时表，用于共享查询

关于创建临时表问题，

需求是这样的

所有的用户都有可能用到查询条件设置

查询条件设置保存在某一个表中

例如 表A 如下

字段 比较符 值 连接符

姓名 = '张三 ' OR

姓名 = '李四 '

-----------------

表A作为用户的查询定义表

那么,当有很多用户需要 写条件时, 表A出现冲突,出错

------解决方案--------------------------------------------------------

既然是临时表,创建使用后应该删除,再次使用再创建就不会有冲突问题

------解决方案--------------------------------------------------------

思路有问题！

表A作为用户的查询定义表

------解决方案--------------------------------------------------------

既然是共享查询，应该不存在写数据问题。查询条件放临时表无必要。你可能使用ACCESS数据库。当有用户在使用临时表时，你无法修改或删除临时表。

------解决方案--------------------------------------------------------

一人一个,根据登陆名来确定所创建的临时表名字比如110登陆就操作 create table #user110

------解决方案--------------------------------------------------------

如果表A加入用户名的话

会不会不方便--当然不会了。

文章名称：vb.net创建临时表的简单介绍
网页地址：http://csdahua.cn/article/dooejdh.html