已经不知所错。。。求各位大神帮忙。
老师让我做一个综合实验。
十月开始做的。。。一直做到现在还是没做出来。
程序很多错误。（我是照着书敲的）
老师说如果我做出来了可以考虑期末考试就考做一个系统。
但是·····我做不出来。
求各位大神帮我找一下到底哪里错了。

数据库和VB程序都在下面的下载链接里、
http://pan.baidu.com/s/1lA2W4
数据库用的是sql server 2008   程序是用vb6.0写的。
为嘛我只能把帖子分数设置100分啊？我想把分数全部散了。
求各位大神帮忙 
------解决方案--------------------
只有sql2005，vs2010
SQL 2008 没装，vb6 没有。

期待楼下的。。
------解决方案--------------------
VB6.0已卸
------解决方案--------------------
大概看了一下,你的数据连接那样写很麻烦,连接数据库字符串应该放在全局变量里面.

Private Sub Form_Load()

    Dim strConn As String

    Dim pubConn As New ADODB.Connection

    Dim rsTable As New ADODB.Recordset

    Dim strSQL As String





    strConn = "Provider=SQLOLEDB.1;Persist Security Info=true;Initial Catalog=DataBaseName;User ID=develop; password=12345;Data Source=HostIP"        

    pubConn.Open strConn



    rsTable.CursorLocation = adUseClient

    strSQL = "select  * from TableName"

    rsTable.Open strSQL, pubConn, adOpenDynamic, adLockOptimistic

    Set DataGrid1.DataSource = rsTable



End Sub

你修改时应该把这个strConn放到全局变量里.
看你的查询语句,感觉你也会写的不少,可是象那个insert ,update语句,建议你先试一条成功,暂时不要用参数,等你熟悉一点后再改为参数.

------解决方案--------------------
做vc的，帮顶吧
------解决方案--------------------
一看vb就脑袋疼的路过