关于数据库建表的问题!

ccone1111 项目经理  2004-09-08 09:26:14
我想做一个vb程序里面有一个按纽,点击他sqlsever中就有一个新表创建!这个代码怎么写啊?谁帮我啊?
...全文
59 点赞 收藏 4
写回复
4 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
ccone1111 2004-09-08
我想判断数据库里有没有这个表怎么判断?
回复
zscjp 2004-09-08
先在菜单中选“工程”,“引用”,在列表中选择
Microsoft ActiveX Data Objects
下面是所要添加的代码。
Public cnnDb As ADODB.Connection '公用数据连接
cnnString = "Provider=SQLOLEDB.1;Password=PassWord;Persist Security Info=True;User ID=sa;Initial Catalog=DataBaseName;"
Set cnnDb = New ADODB.Connection
With cnnDb
.ConnectionString = cnnString
.Open
End With

Private Sub command1_Click()
Dim sql as String
sql="create table tableName ......."
cnndb.execute sql
end Sub


回复
jeff__lueny 2004-09-08
'globe variable
Dim cn As New ADODB.Connection

Private Sub cmdGet_Click()
Dim SQL As String

cn.Open "Driver={SQL Server};Server=abc;Uid=abc;Pwd=abc;Database=abc"
SQL = "Create Table tablename(ID int IDENTITY,aaa nvarchar(10),bb nvarchar(50),aads money)"

cn.Execute SQL

end sub

回复
jeff__lueny 2004-09-08
晕,用ADO啊
回复
相关推荐
发帖

1188

社区成员

VB 数据库(包含打印,安装,报表)
申请成为版主
帖子事件
创建了帖子
2004-09-08 09:26
社区公告
暂无公告