大家救急~~~~~~~~~~~~~~~~~~~,为了mm，我只好厚脸皮上这儿来了

Question

MM晚上急电：要我在明天下午5点之前把如下的vb源程序发给她，无奈vb没有学过，只好上来请教各路高手，mm刚几天前哄回来，请各位发发善心，做做好事，帮帮我吧，我会把我的全部可用分都放完的。源程序请发：[email protected]，不胜感激！做一个用户登录界面，通过数据库的连接进行用户身份及密码的验证，登录后连接到一个多文档窗体，窗里包括一个菜单，一条状态栏，一条工具栏，菜单包括两个一级菜单（文件，连接），文件菜单下包括两个二级菜单（文件一，文件二），连接菜单下包括两个二级菜单（连接一，连接二），状态栏需要分两个单元格，分别显示日期跟操作人员，工具栏里要有四个按钮，分别是（文件一，文件二，连接一，连接二），四个按钮与四个菜单分别要和四个窗体（文件一窗体、文件二窗体、连接一窗体、连接二窗体）建立连接，最后要做一个退出的MSGBOX框，位置随意，最好能够实现用户的管理（添加，删除，修改）。

Answer 1

晕，这个又很多呀，到www.vbeden.com又很多

Answer 2

koa3000(koa)
能不能再发一下到[email protected]跟[email protected]
新浪的那个怎么收不到,谢谢

Answer 3

哎！痴心一片！
去各个 vb 的网站找找吧！ 在 www.google.com 中输入 vb 即可

Answer 4

我收到一位好心朋友的源文件了
可是怎么不能用
我装好vb了，用的是sql sever 2000
谁能告诉我怎么才能正常运行

Answer 5

  是我发的； 不能用 是因为你没有注册控件，
  控件也在包里面 ，你把他们注册一下。  注册方式：
    regsvr32  路径名\MSCOMCTL.OCX
    regsvr32  路径名\MSCMCJP.DLL
    regsvr32  路径名\MSCMCCHS.DLL
 
  路径名 就是你的文件包解压缩的路径

Answer 6

 点击 windows系统的 开始 菜单 ， 点击 运行，
 出现一个窗口，就可以输入 regsvr32  ………………运行了。

Answer 7

  现在可以用了吗？
  还是弹出什么信息框？  我的数据库信息固化在 data1 控件里面的，你要么直接修改data1的属性，
  要么用代码动态修改。

Answer 8

  注意 frmLogin 和 frmUser 两个form里面都有data1控件。
  如果data1控件出问题，你也可以在你的本地机上添加。   你把左边控件里面的 data 控件 分别 拖到 frmLogin 和 frmUser 两个窗体里，
在窗体上自动生成名为data1的控件。
   frmLogin 窗体的 Command1_Click 事件里面，写入下代码：
    With Data1
        .Connect = "Access 2000;"
        .DatabaseName = App.Path & "\Db.mdb"
        .RecordsetType = 1
        .RecordSource = "Select * from User where User='" & Text1.Text & "'"
        .Refresh
    End With  frmUser 窗体 追加如下代码：
Private Sub Form_Load()
        .Connect = "Access 2000;"
        .DatabaseName = App.Path & "\Db.mdb"
        .RecordsetType = 0
        .RecordSource = "USER"
        .Refresh
End SubDb.mdb 就是那个数据库，你可以改成你的数据库名。

Answer 9

我发现是什么原因了，我用sql sever 2000的，
如果那样的话怎么办，你的用Access的吗

Answer 10

 我使用access的，我现在不能用QQ。
 你把db.mdb数据库放在程序同一个路径下，应该就可以了啊。
  
 现在还有什么问题？
 data控件添加木有？

Answer 11

完了，已经过了...无限同情ing...

Answer 12

借宝地一用！！！！
http://expert.csdn.net/Expert/topic/1829/1829397.xml?temp=.4944422