在工程项目中所遇的困难(vb+SQL Server)
在开发的项目中,vb只是个前台工具,只负责界面的设计.有关数据库的操作,比如Select,Insert等全部通过数据库的编程实现(T-SQL).那么怎样通过在vb中的涵数调用,进入数据库中执行(T-SQL)语句. 问题点数：0、回复次数：14Top
1 楼ryuginka（一米八五的猪）回复于 2004-08-02 14:00:12 得分 0
不懂你的意思.Top
2 楼Leftie（左手,为人民币服务）回复于 2004-08-02 14:02:11 得分 0
引用ADOTop
3 楼tmkwind（执著）回复于 2004-08-02 14:06:02 得分 0
对，通过ADO控件Top
4 楼vbman2003（家人）回复于 2004-08-02 14:06:41 得分 0
'运行VB，选择“工程\引用”命令，引用“Microsoft AetiveX Date 2.x Library”
Dim Conn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim Str As String
连接数据库(ODBC数据源)：
Set Conn = New ADODB.Connection
Conn.Open "数据源名称","用户","密码"
打开查询记录集：
Str = "select * from TableName "
Set rs = New ADODB.Recordset
rs.Open Str, Conn, adOpenKeyset, adLockOptimistic
用MSHFlexGrid控件显示查询结果：
Set MSHFlexGrid1.DataSource = rs
关闭对象
rs.Close
Conn.Close
Top
5 楼_1_（该用户已封杀）回复于 2004-08-02 14:07:51 得分 0
不会就是不会 直接说不会一会可能有人把全套的代码贴上来Top
6 楼1410104（兔子）回复于 2004-08-02 14:29:06 得分 0
ado 控件可以连接SQL数据库，具体的设置（家人）给出了，select insert 都是sql语句，建好连接就可通过sql语句对数据库进行你想要的操作了。Top
7 楼RUKYO（蠢蠢的男子汉 - 恋星夜柔光，舔烈酒豪情）回复于 2004-08-02 14:34:50 得分 0
你的困难是？Top
8 楼zolacole（xml）回复于 2004-08-03 16:56:34 得分 0
我说的意思是:你在VB中将不会有任何的select语句,这些语句全在数据库的编程中.Top
9 楼w123wxh（幻雪帝国）回复于 2004-08-04 16:14:08 得分 0
用存储过程啊!
Dim cmd As ADODB.Command
Set cmd = New ADODB.Command
cmd.ActiveConnection = Con
cmd.CommandType = adCmdStoredProc
cmd.CommandText = "存储过程名"
cmd.Execute
Top
10 楼computer17（黄昏之路づ流浪汉）回复于 2004-08-04 16:17:40 得分 0
用楼上的方法很好啊，存储过程会做吧，相关SQL书上也有介绍的Top
11 楼lqj46（少林小子）回复于 2004-08-04 16:22:22 得分 0
對呀﹐使用存儲過程就可以了﹐這樣的話代碼里就沒有SQL語句了。Top
12 楼frankwong（黄梓钿）回复于 2004-08-04 17:21:17 得分 0
通过vb的ado对象连接数据库,对数据库的操作可以通过调用后台的数据库的存储过程进行处理.Top
13 楼zolacole（xml）回复于 2004-08-05 12:45:59 得分 0
谢谢各位大虾了。Top
14 楼thinkpad99（thinkpad99）回复于 2004-08-06 18:11:38 得分 0
引用：
用存储过程啊!
Dim cmd As ADODB.Command
Set cmd = New ADODB.Command
cmd.ActiveConnection = Con
cmd.CommandType = adCmdStoredProc
cmd.CommandText = "存储过程名"
cmd.Execute
补充：
符合楼主意见，想法，VB前台，TSQL后台Top
