Aşağıdaki kodu kullanınız.
Private Sub Command1_Click()
Adodc1.RecordSource = "SELECT * FROM T200_Rehberlik WHERE okulno LIKE '" & Text1 & "%'"
Adodc1.Refresh
Label1.Caption = Adodc1.Recordset.RecordCount
End Sub
Private Sub Command1_Click()
Adodc1.RecordSource = "SELECT * FROM T200_Rehberlik WHERE okulno LIKE '" & Text1 & "%'"
Adodc1.Refresh
Label1.Caption = Adodc1.Recordset.RecordCount
End Sub
Bu Konudaki Yorumlar |
SQL ile sayma - Yazar: ynlmz - 13/03/2013, 01:09
Cvp: SQL ile sayma - Yazar: direnist - 13/03/2013, 01:28
Cvp: SQL ile sayma - Yazar: ynlmz - 13/03/2013, 17:50
Cvp: SQL ile sayma - Yazar: ogulcan92 - 13/03/2013, 20:36
Cvp: SQL ile sayma - Yazar: ynlmz - 13/03/2013, 23:58
|