锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net+创建空数据 vb新建

IT技术方法

用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.net中怎么创建xml文件并写数据DataSet 和 DataTable都有现成vb.net+创建空数据的方法vb.net+创建空数据：WriteXml
DataTable tb = this.dataGridView1.DataSource as DataTable;
if(tb != null)
{
tb.WriteXml(@"C:\table.xml",true);
return;
}
DataView dv =this.dataGridView1.DataSource as DataView;
if(dv != null)
{
dv.Table.WriteXml(@"C:\table.xml",true);
return;
}
IList list = this.dataGridView1.DataSource as IList;
if(list != null)
{
//to do,如果是IList,就要vb.net+创建空数据你自己想办法导出vb.net+创建空数据了
//XmlDocument or XmlWriter都可以考虑
}
VB.NET中如何用SQL语句建表（复制表）？谢谢了！分类:电脑/网络程序设计其他编程语言
问题描述:
在SQL数据库里已有一个现成的空数据表（只有字段、没有数据），请问高手，怎样在VB.NET中用SQL语句把该数据库中的那个表复制一个到该数据库（字段不变、数据为空）只是把数据表的名改了？
谢谢！谢谢！
解析:
select * into 新表 from 旧表
使用 SELECT INTO 插入行
SELECT INTO 语句创建一个新表，并用 SELECT 的结果集填充该表 。新表的结构由选择列表中表达式的特性定义，例如：
SELECT Shippers.*, Link.Address, Link.City,
Link.Region, Link.PostalCode
INTO NewShippers
FROM Shippers
JOIN LinkServer.DB.dbo.Shippers AS Link
ON (Shippers.ShipperID = Link.ShipperID)
SELECT INTO 可将几个表或视图中的数据组合成一个表 。也可用于创建一个包含选自链接服务器的数据的新表 。
vb创建空文本文件的方法？创建空文本文件（有时被叫做“文本流”）有三种方法 。
第一种方法是用 CreateTextFile 方法 。下面vb.net+创建空数据的示例示范了在 VBScript 中如何用这种方法来创建文本文件：
Dim fso, f1
Set fso = CreateObject("Scripting.FileSystemObject")
Set f1 = fso.CreateTextFile("c:\testfile.txt", True)
要在 Visual Basic Scripting Edition 中用这种方法vb.net+创建空数据，则使用下面的代码：
var fso, f1;
fso = new ActiveXObject("Scripting.FileSystemObject");
f1 = fso.CreateTextFile("c:\\testfile.txt", true);
创建文本文件的第二种方法是，使用 FileSystemObject 对象的 OpenTextFile 方法，并设置

推荐阅读


上一篇：db2连表删除sqlserver，db2两表关联删除数据

下一篇：新媒体运营如何调研和分析，新媒体营销调研的方法