AccessTr.neT

Bul · 13/03/2013, 01:09

Sayın hocalarım; veritabanındaki gorusmeler tablomdaki okulno alanında seçtiğim öğrenci ile kaç defa görüştüğümü saymak ve Label1 e yazmasını istiyorum. Aşağıdaki Sql kodunu yazdım ama bir türlü yapamadım.

Dim SqlStr
Call Connection
SqlStr = "Count(okulno) As Integer FROM T200_Rehberlik WHERE okulno= '" & Text1.Text & "'"
Label1.Caption = SqlStr

Bul · 13/03/2013, 01:28

Merhaba;
Benim gördüğüm sorgu cümlenizin başında "SELECT" ifadesi eksikliği var. Onun dışında kodun doğruluğu hakkında hocalarımızda yardımcı olurlar.
İyi çalışmalar.

Bul · 13/03/2013, 17:50

Hocam; select ile de denedim ama olmadı.

Bul · 13/03/2013, 20:36

Sn:ynlmz
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

Bul · 13/03/2013, 23:58

Sayın oğulcan; öncelikle ilginize teşekkür ederim.
Benim veritabanı bağlantım

Public Sub Gorusme_Rehberlik()
    'The Purpose of this function is to manage the recordset "Inpatient_Maintenance"
    Set rs_rehber = New ADODB.Recordset
    With rs_rehber
        .CursorType = adOpenDynamic
        .LockType = adLockOptimistic
        .ActiveConnection = con
        .Source = "Select * from gorusme"
        .CursorLocation = adUseClient
        .Open
    End With
End Sub

bu şekilde.
yapmak istediğimde yeni bir görüşme yaparken daha önce o öğrenci ile daha önce kaçtane görüşme yaptığımın sayısını bulmak ve o sayıyı Label1e yazdırmak istiyorum. Görüşme yaptığım öğrencinin numarası Text1 e yazılıyor. "gorusme" tablomdaki OkulNo alanında o numaradan kaçtane olduğunu bulmaya çalışıyorum.
Yardımınızı bekliyorum.

AccessTr.neT

SQL ile sayma

SQL ile sayma

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Giriş yap

Hesap oluştur

Konu Linkleri