พอดีมีตัวอย่าง U.are.U 4000 vb.net ที่เค้าให้มาเชื่อมกับฐานข้อมูลAccess พอดีต้องทำงานกับ MySQL แบบ Mysql connector แต่ติดตรงที่วนลูปข้อมูลใน DB มาเก็บไว้ที่ cache ครับ ใครผู้รู้ช่วยแปลงเป็นรูปแบบ Mysql connector หน่อย ครับ ติดตรงนี้ แก้หลายวันแล้วครับ..งง
Code
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim i As Integer
Dim sTemp As String
Dim strSQL As String = ""
Dim connStr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & My.Application.Info.DirectoryPath & "\test.mdb;User Id=admin;Password=;"
Dim conn As New OleDbConnection(connStr)
conn.Open()
Dim FingerCount = 0 'กำหนดนิ้วเริ่มต้นของนิ้วที่จะเก็บลงไปใน Memory
fpcHandle = ZKFPEngX1.CreateFPCacheDB 'ประกาศให้มีการสร้าง Cache ฐานข้อมูลใน Memory
strSQL = "select * from fptable"
Dim _cmd As New OleDbCommand(strSQL, conn)
Dim reader As OleDbDataReader = _cmd.ExecuteReader()
Dim _cmd1 As New OleDbCommand(strSQL, conn)
Dim adapter As New OleDbDataAdapter(_cmd1)
Dim data As New DataSet()
adapter.Fill(data, "test")
Dim Fpm As String = ""
i = 0
While (reader.Read()) 'While Fpm ' ทำการ Loop ลายนิ้วมือที่เก็บไว้ในฐานข้อมูลมาสร้าง Cache
sTemp = data.Tables("test").Rows(i)("fpstring") 'ฐานข้อมูลนิ้วเก็บในตรงนี้
ZKFPEngX1.AddRegTemplateStrToFPCacheDB(fpcHandle, FingerCount, sTemp) 'เพิ่ม ลายนิ้วมือเข้าไป โดยมี FingerCount เป็นตัวนับนิ้ว และเรียกเข้าในระบบ String ซึ่งอยู่ในตัวแปร sTemp
ReDim Preserve FFingerNames(FingerCount + 1) 'สร้าง Array ของตัวแปร เพื่อเก็บชื่อ ของนิ้ว เอาไว้เรียกมาแสดงตอนแสดงผล
FFingerNames(FingerCount) = data.Tables("test").Rows(i)("name") 'เอาข้อมูลเข้า
ListBox1.Items.Add(data.Tables("test").Rows(i)("name"))
FingerCount = FingerCount + 1
i = i + 1
End While
reader.Close()
conn.Close()
End Sub
Tag : .NET, VB.NET, VS 2005 (.NET 2.x), VS 2008 (.NET 3.x), VS 2010 (.NET 4.x), VS 2012 (.NET 4.x)
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim i As Integer
Dim sTemp As String
Dim strSQL As String = ""
Dim connStr As String = "Server=localhost;User Id=root; Password=root; Database=mydatabase; Pooling=false"
Dim conn As New MySqlConnection(connStr)
conn.Open()
Dim FingerCount = 0 'กำหนดนิ้วเริ่มต้นของนิ้วที่จะเก็บลงไปใน Memory
fpcHandle = ZKFPEngX1.CreateFPCacheDB 'ประกาศให้มีการสร้าง Cache ฐานข้อมูลใน Memory
strSQL = "select * from fptable"
Dim _cmd As New MySqlCommand(strSQL, conn)
Dim reader As MySqlDataReader = _cmd.ExecuteReader()
Dim _cmd1 As New MySqlCommand(strSQL, conn)
Dim adapter As New MySqlDataAdapter(_cmd1)
Dim data As New DataSet()
adapter.Fill(data, "test")
Dim Fpm As String = ""
i = 0
While (reader.Read()) 'While Fpm ' ทำการ Loop ลายนิ้วมือที่เก็บไว้ในฐานข้อมูลมาสร้าง Cache
sTemp = data.Tables("test").Rows(i)("fpstring")
ZKFPEngX1.AddRegTemplateStrToFPCacheDB(fpcHandle, FingerCount, sTemp)
ReDim Preserve FFingerNames(FingerCount + 1) 'สร้าง Array ของตัวแปร เพื่อเก็บชื่อ ของนิ้ว เอาไว้เรียกมาแสดงตอนแสดงผล
FFingerNames(FingerCount) = data.Tables("test").Rows(i)("name") 'เอาข้อมูลเข้า
ListBox1.Items.Add(data.Tables("test").Rows(i)("name"))
FingerCount = FingerCount + 1
i = i + 1
End While
reader.Close()
conn.Close()
End Sub
Load balance : Server 03
