none
二維陣列 RRS feed

  • 問題

  • 我要把access的資料由datareader讀到後放進一個二為陣列

    請問我要怎麼寫程式碼

     

     

    2006年4月26日 上午 04:13

解答

  • 假定你已經讀成 DataTable

    Dim arrRows() As Object

    With DataTable.Rows

       ReDim arrRows(.Count - 1)

       For i = 0 To .Count - 1

          arrRows(i) = .Items(i).ItemArray

       Next

    End With

    則 arrRows(iRow)(iCol) 為所求。

    2006年4月26日 上午 07:15

所有回覆

  • 假定你已經讀成 DataTable

    Dim arrRows() As Object

    With DataTable.Rows

       ReDim arrRows(.Count - 1)

       For i = 0 To .Count - 1

          arrRows(i) = .Items(i).ItemArray

       Next

    End With

    則 arrRows(iRow)(iCol) 為所求。

    2006年4月26日 上午 07:15
  • 請問要如何用fieldcount指令秀出datareader所讀到的筆數

    這是我的程式碼

    connstr = "provider = microsoft.jet.oledb.4.0;data source = D:\students.mdb"
            Dim conn As OleDbConnection, cmd As OleDbCommand, myreader As OleDbDataReader
            conn = New OleDbConnection(connstr)
            conn.Open()
            cmd = New OleDbCommand(selectcmd, conn)
            myreader = cmd.ExecuteReader()
            Do While myreader.Read()
               
            Loop

    2006年5月1日 上午 08:50
  • DataReader 因為是順向讀取,所以無法取得筆數,fieldcount 應該只是取得 "欄數",如果你要取得筆數,可以先在建立 DataReader 前,先用 SELECT COUNT(...)... 來取得筆數 .
    2006年7月4日 下午 12:48
    版主