STUDY olereader

Imports System.Data
Imports System.Data.OleDb

Public Class WebForm1
    Inherits System.Web.UI.Page

#Region " Web 窗体设计器生成的代码 "

    '该调用是 Web 窗体设计器所必需的。
    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()

    End Sub

    '注意: 以下占位符声明是 Web 窗体设计器所必需的。
    '不要删除或移动它。
    Private designerPlaceholderDeclaration As System.Object

    Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
        'CODEGEN: 此方法调用是 Web 窗体设计器所必需的
        '不要使用代码编辑器修改它。
        InitializeComponent()
    End Sub

#End Region
    Dim MYCONNECTION As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:/TEST.mdb")
    Dim MYCOMMAND As New OleDbCommand("SELECT * FROM test", MYCONNECTION)
    Dim MYREADER As OleDbDataReader
    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        MYCONNECTION.Open()
        MYREADER = MYCOMMAND.ExecuteReader
        Dim k As Int32
        For k = 0 To MYREADER.FieldCount - 1
            Response.Write(MYREADER.GetName(k))
            'Response.Write("<br>")
        Next
        Response.Write("<br>")
        Do While MYREADER.Read
            For k = 0 To MYREADER.FieldCount - 1
                Response.Write(MYREADER.Item(k))
            Next
            Response.Write("<BR>")
        Loop
    End Sub
    Private Sub PAGE_UNLOAD()
        MYREADER.Close()
        MYCOMMAND.Cancel()
        MYCONNECTION.Close()
    End Sub
End Class

 

 

IDart_col_subart_titlephotofileuploadtimeIP
25507主任医师2004-7-25 15:04:34127.0.0.1
25517副主任医师2004-7-25 15:04:58127.0.0.1
25527护士2004-7-25 15:05:22127.0.0.1
25608SSS2004-7-25 15:45:49127.0.0.1
25628DDDDDDDDD2004-7-25 15:46:37127.0.0.1
25635林荣丰/images/hr120_3_7.gif2004-7-30 9:37:56127.0.0.1
25645柴劲松/images/hr120_4_2.gif2004-7-30 9:38:19127.0.0.1
25655孙宝仲2004-7-30 9:38:39127.0.0.1
25665张庆红/images/hr120_3_3.gif2004-7-30 9:39:07127.0.0.1
25675黄仁郅/images/hr120_3_9.gif2004-7-30 9:39:24127.0.0.1
25695黄丽/images/hr120_4_1.gif2004-7-30 9:40:08127.0.0.1
25705朱宽云/images/hr120_3_2.gif2004-7-30 9:40:25127.0.0.1
257931男人10大时尚陷阱2004-7-31 9:42:25192.168.0.1
258031爱面子的中年男人2004-7-31 9:43:15192.168.0.1
258131牛仔秀裸露再创新低2004-7-31 9:45:32192.168.0.1
258231<花花女郎>讨论何为猛男2004-7-31 10:04:49192.168.0.1
258331今年男装流行耍大牌2004-7-31 10:09:08192.168.0.1
258431男人向性感靠拢2004-7-31 10:11:49192.168.0.1
258532男人25岁就开始脱发！2004-7-31 10:19:07192.168.0.1
258632盛夏男人保健五大提醒2004-7-31 10:19:38192.168.0.1
258732男人也有不想要的时候2004-7-31 10:20:43192.168.0.1