📄 subject_45429.htm
字号:
<p>
序号：45429 发表者：绚 发表日期：2003-06-30 14:33:56
<br>主题：请教
<br>内容：请教在线的各位,小弟用vb和sql做了一个东西,现在遇到一个比较菜的问题,我想用vb对sql进行操作,dim cnn1 as adodc 但是却不知道怎么对cnn1付值.想请问在线的高手,我该怎么办?其实就是说在vb代码中sql的语法要怎么写?????<BR> 望赐教......
<br><a href="javascript:history.go(-1)">返回上页</a><br><a href=http://www.copathway.com/cndevforum/>访问论坛</a></p>
<hr size=1>
<blockquote><p>
回复者：晚风也渡 回复日期：2003-06-30 15:12:51
<br>内容：adodc我感觉是个控件名称,你上面说的定义恐怕不妥,cnn1你要是想定义为连接的话,应该是dim cnn as adodb.connection吧?<BR>举个例子:<BR>Dim str As String<BR>Dim rs As ADODB.Recordset<BR>Dim cnn As ADODB.Connection<BR>Set cnn = New ADODB.Connection<BR>Set rs = New ADODB.Recordset<BR>str = "Select * From answer"<BR>cnn.ConnectionString = "driver={sql server};server=itju06;uid=sa;pwd=;database=test"<BR>cnn.Open<BR>rs.Open str, cnn, adOpenDynamic, adLockOptimistic
<br>
<a href="javascript:history.go(-1)">返回上页</a><br><a href=http://www.copathway.com/cndevforum/>访问论坛</a></p></blockquote>
<hr size=1>
<blockquote><p>
回复者：绚 回复日期：2003-06-30 17:21:39
<br>内容：楼上的高手,谢谢你了,可是想请问一下:<BR>rs.Open str, cnn, adOpenDynamic, adLockOptimistic <BR>有什么用呢?<BR>谢谢~
<br>
<a href="javascript:history.go(-1)">返回上页</a><br><a href=http://www.copathway.com/cndevforum/>访问论坛</a></p></blockquote>
<hr size=1>
<blockquote><p>
回复者：晚风也渡 回复日期：2003-07-01 08:57:15
<br>内容：那句话是打开记录集的意思,后面的那些参数的用法可查看MSDN
<br>
<a href="javascript:history.go(-1)">返回上页</a><br><a href=http://www.copathway.com/cndevforum/>访问论坛</a></p></blockquote>
<hr size=1>
<blockquote><p>
回复者：绚 回复日期：2003-07-01 09:36:21
<br>内容：谢谢,谢谢~<BR>终于有点头绪了,还想请问一下,我是用vb远程到sql:<BR> cnn.Open "jcb\px_database_test", userid = sa, Password = 555555<BR>可是运行的时候它总是说administartor登陆错误,不然就是ture登陆错误,,请问是怎么回事呢??<BR>谢谢.......
<br>
<a href="javascript:history.go(-1)">返回上页</a><br><a href=http://www.copathway.com/cndevforum/>访问论坛</a></p></blockquote>
<hr size=1>
<blockquote><p>
回复者：要省钱 回复日期：2003-07-01 10:00:48
<br>内容：jcb\px_database_test 这里怎么有'\'啊,是不是'.'<BR><BR>userid = sa 这里userid是不是要改uid<BR><BR><BR>//随便问问~~~
<br>
<a href="javascript:history.go(-1)">返回上页</a><br><a href=http://www.copathway.com/cndevforum/>访问论坛</a></p></blockquote>
<hr size=1>
<blockquote><p>
回复者：绚 回复日期：2003-07-01 10:45:00
<br>内容：谢谢,<BR>它在企业管理器上是这样写的<BR>改了,还是不行啊.
<br>
<a href="javascript:history.go(-1)">返回上页</a><br><a href=http://www.copathway.com/cndevforum/>访问论坛</a></p></blockquote>
<hr size=1>
<blockquote><p>
回复者：要省钱 回复日期：2003-07-01 14:22:41
<br>内容：程序的完整源代码如下:<BR>/*************************************/<BR>'ado编程:<BR><BR>private sub form_load()<BR>'定义connection和recordset<BR>dim cn as new adodb.connection<BR>dim rs as adodb.recordset<BR>'定义cn的连接参数<BR>cn.provider="sqloledb"<BR>cn.properties("data source").value="myservername" --定义服务器名<BR>cn.properties("Initial Catalog").value="northwind" --定义数据库名:<BR>cn.properties("integrated security").value="SSPI" --integrated security关键字为SSPI以确认使用集成的windows NT方式.<BR>//cn.UserID ="sa" --1这里是windows验证,,<BR>//cn.Password ="****" --2,不需要这两行<BR>cn.open<BR>'设置rs的对应connection和rs的查询语句<BR>Set rs=New Adodb.recordset<BR>set rs.Activeconnection=cn<BR>rs.open("select * from products")<BR>'在datagrid中显示数据<BR>if rs.recordcount>0 then<BR>set dgrd_product.datasource=rs<BR>end if<BR>end sub<BR>/*************************************/<BR><BR><BR>
<br>
<a href="javascript:history.go(-1)">返回上页</a><br><a href=http://www.copathway.com/cndevforum/>访问论坛</a></p></blockquote>
<hr size=1>
<blockquote><p>
回复者：绚 回复日期：2003-07-01 14:55:41
<br>内容：感谢感谢!感谢省钱哥哥.太感谢你了.有空一定请你吃饭.不知道是否方便告诉一个油箱???<BR>顺便请问一句,如果我想在vb 中使用sql的验证应该怎么做呢???<BR>真的很谢谢你.
<br>
<a href="javascript:history.go(-1)">返回上页</a><br><a href=http://www.copathway.com/cndevforum/>访问论坛</a></p></blockquote>
<hr size=1>
<blockquote><p>
回复者：要省钱 回复日期：2003-07-01 15:15:22
<br>内容：你上面可不可以连接????<BR><BR><BR><BR><BR>//很想知道
<br>
<a href="javascript:history.go(-1)">返回上页</a><br><a href=http://www.copathway.com/cndevforum/>访问论坛</a></p></blockquote>
<hr size=1>
<blockquote><p>
回复者：绚 回复日期：2003-07-01 15:30:57
<br>内容：没有出错,但是在form1中的datagrid1也显示不出内容
<br>
<a href="javascript:history.go(-1)">返回上页</a><br><a href=http://www.copathway.com/cndevforum/>访问论坛</a></p></blockquote>
<hr size=1>
<blockquote><p>
回复者：绚 回复日期：2003-07-01 16:16:01
<br>内容：还有啊，省钱哥它老是说我第1行‘1’附近有错误。请问是怎么回事呢？
<br>
<a href="javascript:history.go(-1)">返回上页</a><br><a href=http://www.copathway.com/cndevforum/>访问论坛</a></p></blockquote>
<hr size=1>
<blockquote><p>
回复者：外高桥保税区 回复日期：2003-07-01 16:57:17
<br>内容：没有 refrence adoDb？
<br>
<a href="javascript:history.go(-1)">返回上页</a><br><a href=http://www.copathway.com/cndevforum/>访问论坛</a></p></blockquote>
<hr size=1>
<blockquote><p>
回复者：绚 回复日期：2003-07-01 17:00:33
<br>内容：不懂。。。。。
<br>
<a href="javascript:history.go(-1)">返回上页</a><br><a href=http://www.copathway.com/cndevforum/>访问论坛</a></p></blockquote>
<hr size=1>
<blockquote><p>
<font color=red>答案被接受</font><br>回复者：要省钱 回复日期：2003-07-01 19:11:08
<br>内容：/////在网上down的,你自己先去研究一下,,应该可以帮你解决问题<BR><BR>VB通过ADO连接SQL数据的两种方法 <BR><BR><BR><BR>VB使用ADO数据库可以分为有源数据库和无源数据库，即是否使用了DSN数据源，如下例： <BR>1、在连接数据库前首先要在VB菜单中“工程”-“引用”从中选择 microsoft activeX Data objects 2.6 library和 microsoft activeX Data objects recordset 2.6两个组件，这是在连接数据前所必做的工作。 <BR>2、接下来定义ADO的连接对象，如下所示： <BR>Set conn = New ADODB.Connection <BR>Set rs = New ADODB.Recordset <BR>第一种方法采用的是无源的数据库连接方法 <BR>conn.ConnectionString = "Driver={sql server};server=JSZX3-11;uid=sa;pwd=;database=wzc" <BR>conn.ConnectionTimeout = 30 <BR>conn.Open <BR>rs.Open "select 用户名,密码 from login where 用户名='" & Trim(Combo1.Text) & "' And 密码='" & Trim(Text1.Text) & "'", conn, adOpenStatic, adLockReadOnly, adCmdText <BR>If rs.EOF = True And rs.BOF Then <BR>m = MsgBox("请重新登录", vbExclamation) <BR>Text1.Text = "" <BR>Text1.SetFocus <BR>Else <BR>Form1.Hide <BR>End If <BR>rs.Close <BR>这是第二种方法连接数据库的方法，这一种方法是采用有源的方法与数据库连接的方法，代码如下所示： <BR>Set conn = New ADODB.Connection <BR>Set rs = New ADODB.Recordset <BR>conn.ConnectionString = "DSN=login;uid=sa;pwd=;" <BR>conn.ConnectionTimeout = 30 <BR>conn.Open <BR>rs.Open "select 用户名 from login", conn, adOpenStatic, adLockReadOnly, adCmdText <BR>Dim i As String <BR>For t = 0 To Val(rs.RecordCount) - 1 <BR>i = Trim(rs.Fields("用户名").Value) <BR>rs.MoveNext <BR>Combo1.AddItem i <BR>Next t <BR>rs.Close <BR>连接数据库的方法很多很多，只要各位去勇敢的偿试一下，就可以感觉数据库的方法并不是很难，本人以前也很想做这方法的工作，只是学识不深，未能完成胸中大志，如今对这些方法的多少有一些了解，特意为那些初学者以供学习之用。 <BR><BR>
<br>
<a href="javascript:history.go(-1)">返回上页</a><br><a href=http://www.copathway.com/cndevforum/>访问论坛</a></p></blockquote>
<hr size=1>
<blockquote><p>
回复者：要省钱 回复日期：2003-07-01 19:12:40
<br>内容：http://www2.jiafangyifang.com/news/newsdata/2003_06_13/3/20030613101325.htm<BR><BR><BR>//14楼的地址:(转载)<BR>
<br>
<a href="javascript:history.go(-1)">返回上页</a><br><a href=http://www.copathway.com/cndevforum/>访问论坛</a></p></blockquote>
<hr size=1>
<blockquote><p>
回复者：绚 回复日期：2003-07-02 08:32:58
<br>内容：万分感谢,省钱哥,受小弟一拜~~!<BR>2003-7-2 15:02:43⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -