毕业设计的苦难!!!!

[diewu]

高手哥哥们,有人能帮我解释一下这段代码吗?是VB连接SQL数据库时用的
Public Const CnStr As String = "provider=sqloledb.1;server=anchoret;" _
& "uid=sa;pwd=sa;database=ExamTest"

Public Function GetGuid() As String
Dim rs As Recordset
Set rs = New Recordset
rs.ActiveConnection = CnStr
rs.Source = "select newid()"
rs.Open
GetGuid = rs.Fields(0).Value
rs.Close
Set rs = Nothing
End Function

能帮我看一下是用什么方法连接的吗?

请帮帮小妹吧,不甚感激!!!!! 请尽快,因为明天要交论文了!!!!!!!!!!!!!!!!

[wingnal]

晕

[lightwu]

不明白，Ado连接的，不过这程序能执行吗？没有打开连接阿

[daisy8675]

虽然你这段代码是可以运行的，但是从个人角度上觉得你这代码写的实在烂
我个人觉得你根本没有试过这段代码是否能正常运行

1、你知道const用在啥时候吗？const是常量的时候才用
所以写成Pubkuc cnstr as string就行

2、VB中间没有public a as string="XXXX"这样的写法，你把这代码帖到VB中间，我就不相信VB不给你显示成红色？？？？
正确的写法是
public strConn as string
strconn=”连接字符"

3,用了recordset的ActiveConnection和Source，这一看，我还以为是adodc，再看又不是，稍微有点常识的要知道ado的连接方法是Connection与Recordset相集合。

MM，给你写这代码的人也实在太垃圾了，你照书抄也不至于这样，无话可说。

[daisy8675]

虽然你这段代码是可以运行的，但是从个人角度上觉得你这代码写的实在烂
我个人觉得你根本没有试过这段代码是否能正常运行

1、你知道const用在啥时候吗？const是常量的时候才用
所以写成Pubkuc cnstr as string就行

2、VB中间没有public a as string="XXXX"这样的写法，你把这代码帖到VB中间，我就不相信VB不给你显示成红色？？？？
正确的写法是
public strConn as string
strconn=”连接字符"

3,用了recordset的ActiveConnection和Source，这一看，我还以为是adodc，再看又不是，稍微有点常识的要知道ado的连接方法是Connection与Recordset相集合。

MM，给你写这代码的人也实在太垃圾了，你照书抄也不至于这样，无话可说。

[hsghxm]

呵呵，不知道是楼主没学好还是导师出的题目太难了~现在的毕业设计的目的不知道图什么。我敢确信楼主连VB环境都没，或者就是上面这段代码出现了红色的字楼主都看不懂是什么？最起码不知道是错误！

[hr88rong]

1、数据库如果是SQL的话,连接字符串是这样写的
public cnstr as string
cnstr="Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;password=;Initial Catalog=数据库名称;Data Source=服务器名称"
2、
Public Function GetGuid() As String
Dim rs As Recordset'你这边是什么意思，定义记录集吗？
'正确方法：dim rs as adodb.recordset set rs=new adodb.recordset
Set rs = New Recordset''************
rs.ActiveConnection = CnStr
rs.Source = "select newid()" '这边呢？啥意思？sql语句也不是那样写的。
rs.Open
GetGuid = rs.Fields(0).Value
rs.Close
Set rs = Nothing
End Function
3、他们说的没错，小妹你真的连VB开发环境都没有
4、你的问题是什么哦？用什么方法连接吗？我也不知道你用的是什么方法，可能是杂派的！连接数据库的方法，在FAQ中有很多例子，你可以去找找！
5、最后衷心祝你顺利毕业！：）

[dqhuaying]

小莫阿姨发飚了 哈哈

[chenyu5188]

ado对象编程，连接字符串方式连接

[lengye]

上面代码有红色吗？

[cxbkkk]

呵呵，mm我理解你哈，因为我有个干mm也是临要交毕业论文才急着让我给她做一个毕业设计，不过你这个实在是不好说啊，呵呵。