Re: [.NET] 讀取輸入的字來呼叫資料表的資料列
※ 引述《kenimai (是的, 我只喜歡妳)》之銘言:
: 你的 DataTable是放全部的資料還是搜尋後的資料 ?
: 若是搜尋後的資料, 應該會只找到唯一一筆會員資料 (如果會員編號是PK的話)
: DataTable 裡只有唯一一筆, 索引就是 0 啦, Rows(0)~
我的資料表是放全部的資料
如果我現在希望可以由Form1的TextBox讀取會員編號,
再按鈕由會員編號對應出各項資料至Form2..
卡的點我標在下面的程式碼..
其實我看過一些開放源碼的連結資料庫程式,
但沒看到自行輸入編號再叫出資料的寫法..
============================ 程式碼 ============================
Dim objDataSet As DataSet
Dim curr, max As Integer
Private Sub manaMember_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
Dim objCon As OleDbConnection
Dim objDataAdapter As OleDbDataAdapter
Dim strDbCon As String
strDbCon = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source =
comicDB.mdb"
objCon = New OleDbConnection(strDbCon)
objCon.Open()
objDataAdapter = New OleDbDataAdapter("SELECT * FROM member", objCon)
objDataSet = New DataSet()
objDataAdapter.Fill(objDataSet, "comicDB")
max = objDataSet.Tables("comicDB").Rows.Count
objCon.Close()
curr = 1
ShowRecord(curr)
End Sub
Sub ShowRecord(ByVal pos As Integer)
Dim objRow As DataRow
objRow = objDataSet.Tables("comicDB").Rows(0)
^ 我是希望這裡可以
由輸入的會員編號對照索引欄位
TextBox6.Text = objRow("PW")
TextBox2.Text = objRow("姓名")
TextBox3.Text = objRow("性別")
TextBox4.Text = objRow("聯絡電話")
TextBox5.Text = objRow("出生日期")
End Sub
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 59.113.3.173
※ 編輯: siaujan 來自: 59.113.3.173 (05/04 02:08)
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 3 之 4 篇):