Foxtable(狐表)用户栏目专家坐堂 → [分享]创建sql数据库的dll文件。


  共有5052人关注过本帖树形打印复制链接

主题:[分享]创建sql数据库的dll文件。

帅哥哟,离线,有人找我吗?
cnsjroom
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1571 积分:11238 威望:0 精华:0 注册:2021/1/17 17:06:00
  发帖心情 Post By:2021/1/18 15:13:00 [显示全部帖子]

组合运行提示错误  有没有老师可以帮忙解答呢?
Dim cr As new cr.class1
Dim a1 As String = """" & "Data Source= " & e.Form.Controls("TextBox1").Value & ";"
Dim a2 As String = "Initial Catalog= " & e.Form.Controls("TextBox2").Value & ";"
Dim a3 As String = "user id= " & e.Form.Controls("TextBox3").Value & ";"
Dim a4 As String = "Password= " & e.Form.Controls("TextBox4").Value & ""","
Dim a5 As String = """" & e.Form.Controls("TextBox5").Value & ""","
Dim a6 As String =  """" & e.Form.Controls("TextBox6").Value & ""","
Dim a7 As String =  """" & e.Form.Controls("TextBox7").Value & ""","
Dim a8 As String =  """" & e.Form.Controls("TextBox8").Value & ""","
Dim a9 As String =  """" & e.Form.Controls("TextBox9").Value & """"
Dim str As String = a1 &  a2  & a3 & a4 & a5 & a6 & a7 & a8 & a9 
e.Form.Controls("TextBox10").text=str
cr.CreateDatabase(str)

图片点击可在新窗口打开查看此主题相关图片如下:11111.png
图片点击可在新窗口打开查看


 回到顶部