谁帮我一下很简单的问题: -----

Hotthing 2003-10-27 01:29:41
正在学VB,
按照书上的例子输入以下一段程序

但是按运行键后,
总是通不过

User definded type not defind. 指 Configuare 这一行
是在哪里错了


' these variables hold the things about the site, like the name and mail domain. We'll ' use these later on...
Private m_strSiteName As String
Private m_strMailDomain As String

' this variable holds the connection string needed to connect to the database...
Private m_strDBString As String


Public Sub Configure(ByVal strSiteName As String, ByVal strMailDomain As String, _
ByVal strDBString As String, ByVal Session As Session)

' copy the site name, etc...
m_strSiteName = strSiteName
m_strMailDomain = strMailDomain

' copy the database details...
m_strDBString = strDBString


' Hold the Session information...
'Set m_Session = Session

'If Not m_Session Is Nothing Then

' Capture the BasketID...
'm_BasketID = CLng(m_Session("BasketID"))
'm_CustomerID = CLng(m_Session("CustomerID"))
'm_OrderID = CLng(m_Session("OrderID"))
'm_SupplierID = CLng(m_Session("SupplierID"))

'End If



End Sub

...全文
31 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
Hotthing 2003-10-27
  • 打赏
  • 举报
回复
谢谢加分!
射天狼 2003-10-27
  • 打赏
  • 举报
回复
你这里的Session是什么类型,是它没有定义!!
felix 2003-10-27
  • 打赏
  • 举报
回复
ByVal Session As Session
Session没定义

7,789

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧