Kod:
Private Sub Komut2_Click()
If IsNull(Me.AdıSoyadı) Then
DoCmd.OpenReport "ogrenciler", acViewPreview
Else
DoCmd.OpenReport "ogrenciler", acViewPreview, , "AdıSoyadı='" & Me.AdıSoyadı & "'"
End If
End Sub
Private Sub Komut2_Click()
If IsNull(Me.AdıSoyadı) Then
DoCmd.OpenReport "ogrenciler", acViewPreview
Else
DoCmd.OpenReport "ogrenciler", acViewPreview, , "AdıSoyadı='" & Me.AdıSoyadı & "'"
End If
End Sub
Bu Konudaki Yorumlar |
Raporda Ölçüt - Yazar: nsahin - 22/04/2010, 15:27
Cvp: Raporda Ölçüt - Yazar: Seruz - 22/04/2010, 15:48
Cvp: Raporda Ölçüt - Yazar: nsahin - 22/04/2010, 16:07
Cvp: Raporda Ölçüt - Yazar: Seruz - 22/04/2010, 16:20
Cvp: Raporda Ölçüt - Yazar: nsahin - 22/04/2010, 16:34
|