 |
|
ขอคำชี่แนะหน่อยครับ มือใหม่หัดทำ ผม จะให้เมื่อกด ปุ่ม Button1 หนึ่งครั้ง โปรแกรมรู้ว่ากดหนึ่งครั้ง พอ กด ปุ่ม Button8 หนึ่งครั้ง |
|
 |
|
|
 |
 |
|
ผม จะให้เมื่อกด ปุ่ม Button1 หนึ่งครั้ง โปรแกรมรู้ว่ากดหนึ่งครั้ง พอ กด ปุ่ม Button8 หนึ่งครั้ง โปรแกรมก็ลดค่า ของที่กด Button1แต่ตามวันที่เดียวกันน่ะครับ ผมจะเอาไว้ จำกัดการ Login อ่ะครับ ผมลองตั้งตัวแปรแล้วแต่ พอ ปิดโปรแกรมมันก็หายไปเลยครับ เริ่มนับใหม่อีกครับ ขอคำชี่แนะหน่อยครับ
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BinL1.Click
With Conn
Conn = New OleDb.OleDbConnection(strConnection)
Conn.Open()
End With
sqlSave = "INSERT INTO ST([ID],[Room],[Timein],[Date])"
sqlSave &= "VALUES('" & TextBoxID.Text & "','" & LI1.Text & "','" & dtpIn.Text & "','" & DateTimePicker.Text & "')"
With com
.CommandText = sqlSave
.CommandType = CommandType.Text
.Connection = Conn
.ExecuteNonQuery()
End With
If MsgBox("ป้อนข้อมูลเรียบร้อยแล้ว" & n1.ToString, MsgBoxStyle.Question + MsgBoxStyle.OkOnly) = MsgBoxResult.Yes Then
End If
End Sub
Private Sub Button8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BotL1.Click
With Conn
Conn = New OleDb.OleDbConnection(strConnection)
Conn.Open()
End With
sqlSave = "INSERT INTO ST([ID],[Room],[Timeout],[Date])"
sqlSave &= "VALUES('" & TextBoxID.Text & "','" & LO1.Text & "','" & dtpOut.Text & "','" & DateTimePicker.Text & "')"
With com
.CommandText = sqlSave
.CommandType = CommandType.Text
.Connection = Conn
.ExecuteNonQuery()
End With
If MsgBox("ป้อนข้อมูลเรียบร้อยแล้ว", MsgBoxStyle.Question + MsgBoxStyle.OkOnly) = MsgBoxResult.Yes Then
End If
End Sub
Tag : - - - -
|
|
 |
 |
 |
 |
Date :
2010-02-16 22:41:57 |
By :
crackza |
View :
1082 |
Reply :
4 |
|
 |
 |
 |
 |
|
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
ขอคำชีแนะด้วยครับ
|
 |
 |
 |
 |
Date :
2010-02-16 23:16:20 |
By :
crackza |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
ฺีButton1 = Log in ?
Button8 = Log out?
ใช่มั้ยครับ
คุณก็ตรวจสอบ database ก่อนซิครับว่า มีการ login logout user id นี้หรือเปล่า เช่น ตรวจสอบว่า user "admin" logout หรือยัง
SELECT [ID],[Room],[Timein],MAX([Timeout]),[Date]) FROM ST WHERE [ID] = 'admin' AND [DATE] = 'วันนี้'
อันนี้แนวคิดครับ คุณต้องไปปรับใช้เอง
|
 |
 |
 |
 |
Date :
2010-02-17 10:38:15 |
By :
numenoy |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
ขอบคุณครับ ท่านลอง ทำเป็นตัวอย่างให้ซักนิด ได้ไมครับเริ่มไม่ถูก
|
 |
 |
 |
 |
Date :
2010-02-17 11:29:27 |
By :
crackza |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
ช่วยด้วยครับ
|
 |
 |
 |
 |
Date :
2010-02-18 12:08:00 |
By :
crackza |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
|
|