手把手教你使用VB来创建ASP组件(5)

西王呢豪

西王呢豪

2016-01-29 19:15

手把手教你使用VB来创建ASP组件(5),手把手教你使用VB来创建ASP组件(5)
  5、 IsEof方法

  IsEof方法是用来判断是否还有更多的信息

其代码如下

Private Function IsEof() As Boolean

IsEof = RecordSetCD.EOF

End Function

6、 NextCD 方法

  NextCD方法的目的是返回当前的CD信息,并将记录集的指针向下移动,这可以通过MoveNext方法和IsEof配合使用来实现

Private Sub NextCD(Id As Variant, Name As Variant, Author As Variant, Price As Variant, Information As Variant)

On Error Resume Next

If IsEof = True Then

Err.Raise vbObject + 1, "CD Information", "End of cursor"

Exit Sub

End If

Id = RecordSetCD.Fields("CD_ID")

Name = RecordSetCD.Fields("CD_Name")

Author = RecordSetCD.Fields("CD_Author")

Price = RecordSetCD.Fields("CD_Price")

Information = RecordSetCD.Fields("CD_Information")

RecordSetCD.MoveNext

End Sub

  好,我们已经编写好了组件,把它们编译成CD.dll后,你最好把他们注册一下 方法是在DOS界面下,输入regsvr32 CD.dll  
展开更多 50%)
分享

猜你喜欢

手把手教你使用VB来创建ASP组件(5)

ASP
手把手教你使用VB来创建ASP组件(5)

手把手教你使用VB来创建ASP组件(2)

ASP
手把手教你使用VB来创建ASP组件(2)

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

手把手教你使用VB来创建ASP组件(7)

ASP
手把手教你使用VB来创建ASP组件(7)

手把手教你使用VB来创建ASP组件(1)

ASP
手把手教你使用VB来创建ASP组件(1)

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

手把手教你使用VB来创建ASP组件(4)

ASP
手把手教你使用VB来创建ASP组件(4)

手把手教你使用VB来创建ASP组件(6)

ASP
手把手教你使用VB来创建ASP组件(6)

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

ASP中时间函数的使用(二)

ASP中时间函数的使用(二)

让linux支持你的DMA66硬盘

让linux支持你的DMA66硬盘
下拉加载更多内容 ↓