以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  不能创建数据库  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=21915)

--  作者:lihe60
--  发布时间:2012/7/27 13:29:00
--  不能创建数据库

Dim pwd As String
If InputValue(pwd, "筛选","请输入创建数据库名称:")
End If

dim cmd as newcommand
cmd.connectionname=“sql”

cmd.CommandText = "CREATE DATABASE  \'" & pwd & "\'"
cmd.ExecuteNonQuery()

 

这个代码是创建数据的代码,但却不执行了。

 

 


--  作者:blackzhu
--  发布时间:2012/7/27 13:40:00
--  
我不知道你新建数据库代码对不对?就你这个代码:

Dim pwd As String
If InputValue(pwd, "筛选","请输入创建数据库名称:")

dim cmd as newcommand
cmd.connectionname=“sql”

cmd.CommandText = "CREATE DATABASE  \'" & pwd & "\'"
cmd.ExecuteNonQuery()

End if


貌似应该这样写吧?


--  作者:lihe60
--  发布时间:2012/7/27 13:57:00
--  
结果是一样的。
图片点击可在新窗口打开查看此主题相关图片如下:未命名.gif
图片点击可在新窗口打开查看

--  作者:shenyl0211
--  发布时间:2012/10/4 11:51:00
--  
Dim pwd As String
If InputValue(pwd, "筛选","请输入创建数据库名称:")
    Dim cmd As new sqlcommand
    cmd.c
    cmd.CommandText = "CREATE DATABASE " & pwd
    cmd.ExecuteNonQuery()
End If