| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 536 人关注过本帖
标题:新手 ,请教一个VB程序问题,请大家帮帮忙
取消只看楼主 加入收藏
chenyanan
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2010-1-3
结帖率:66.67%
收藏
已结贴  问题点数:20 回复次数:2 
新手 ,请教一个VB程序问题,请大家帮帮忙
最近写一个SQL的课程设计,是用VB写的,代码写的差不多了,是 客房信息管理系统
Option Explicit
Public conn As ADODB.Connection
Public mrc As ADODB.Recordest
Public cmd As

Public user_ID As String
Public flagTedit As Boolean
Public flagRedit As Boolean
Public flagBedit As Boolean
Public flagCedit As Boolean
Public flagSedit As Boolean
Public gintCmode As Integer
Public gintTmode As Integer
Public gintRmode As Integer
Public gintBmode As Integer


Public Sub DatabaseOpen()
   Dim ConnecString As String
   Set conn = New ADODB.Connection
   ConnectString = "Provider=sqloledb;integrated security=sspi;Data Source=YY-PC;Initial Catalog=Hotel"
   conn.CursorLocation = adUseClient
   conn.Open ConnectString
   Set cmd = New
   cmd.ActiveConnection = conn
   

End Sub

Public Sub DatabaseClose()
If conn.State = 1 Then
    conn.Close
End Sub


运行的时候在红字标出的地方老是出错
会出现“用户定义类型未定义”Public mrc As ADODB.Recordest
到底该怎么办?

说要应用的控件我也引用了,还是出现这个问题

请各位帮帮忙,有点急



搜索更多相关主题的帖子: 管理系统 
2011-05-25 16:11
chenyanan
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2010-1-3
收藏
得分:0 
大家快来帮我看看呢
2011-05-25 16:15
chenyanan
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2010-1-3
收藏
得分:0 
回复 3楼 不说也罢
谢谢你啊 ,我还有一些问题,方便和你交流吗?
2011-05-26 19:52
快速回复:新手 ,请教一个VB程序问题,请大家帮帮忙
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.015624 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved