vb ado and sql server 如何把combox的中的text作为一个字段保存到数据库的一个表中?你把它生成SQL语句呀, 看看 CREATE TABLE ....第一个问题问太空洞太简单了 没法回答 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 dim servername,databasenameServername=z007Databasename=mydbsql = "Provider=SQLOLEDB.1;User ID=sa;Initial Catalog=master;Data Source= " & ServernameCon.Open sqlsql = "SELECT * FROM sysdatabases Where name = '" & Databasename & "'"rs.Open sql, Con, adOpenKeyset, adLockReadOnly, adCmdTextIf rs.RecordCount = 1 Thensql = "drop database " & DatabasenameCon.Execute sqlEnd Ifsql = "create database " & Databasename & " on ( name=" & Databasename & ", filename= 'd:\mydb.mdf') log on ( name=" & Databasename & "_log, filename='d:\mydb.ldf')"Con.Execute sqlCon.Close sql = "insert into yourtable (field1) values( " & combox1.text &"("Con.Execute sql 建议大家都不要在VB版了吧!这里有人不欢迎你! vb中监视窗口都有什么作用 组件怎么有缓存的啊?怎么去掉啊? 如何格式化text控件的输入格式? 用ADODC连接VFP数据库时的ConnectionString该怎么写? 怎么感觉最近学习没提高呀,有什么好的方法? 我想写个病毒专杀,谁有这方面的资料? CSDN坏了,无法回答问题. 高分求救!!!!!关于HOOK的调用(全局)!!! 40分大相送,如何在VB中调用wordpad打印指定 .rtf文件(无内容) 哪位高手解释一下中间件、句柄的含义? listview中删除数据
Servername=z007
Databasename=mydb
sql = "Provider=SQLOLEDB.1;User ID=sa;Initial Catalog=master;Data Source= " & Servername
Con.Open sql
sql = "SELECT * FROM sysdatabases Where name = '" & Databasename & "'"
rs.Open sql, Con, adOpenKeyset, adLockReadOnly, adCmdText
If rs.RecordCount = 1 Then
sql = "drop database " & Databasename
Con.Execute sql
End If
sql = "create database " & Databasename & " on ( name=" & Databasename & ", filename= 'd:\mydb.mdf') log on ( name=" & Databasename & "_log, filename='d:\mydb.ldf')"
Con.Execute sql
Con.Close
Con.Execute sql