Etiketler
|
|
|
Ado Kullanılması İçin Hangi Referansın Eklenmesi Gerekli.
|
Merhaba ADO ile kayıt yapılabilmesi için resimdeki referanslardan hangileri eklenmeli. Teşekkürler 2010 32 bit
[Resim: https://resim.accesstr.net/do.php?img=9759]
|
Ado İle Kayit Edilen Bilginin Mukerrer Olmasi Nasil Onlenir?
|
Merhaba Asagidaki kod ile tabloya kayit yapiliyor. Fakat formda ileri geri gezinirken herhangi bir kaydin uzerindeyanlislikla tekrar kaydet tusuna basildiginda dogal olarak ayni kaydin 2.bir kopyasini daha tabloya ekliyor. Bu durumun engellenmesi icin ne yapilabilir. msgbox ile islemin engellenmesine yonelik bir durum yaratip sub dan cikilmasini saglamak dogru bir yontem olurmu baska ne gibi bir onlem alinabilir. Tesekkurler.
[vb]Private Sub KAYDET_BTN_Click()
If Me.UyeNo_TXT = "" Or IsNull
|
Ado İle Kayıt Sonrası Gezinti Tuşları Doğru Çalışmıyor.
|
Merhaba
Formda ADO ile kaydedilen kayıtlar arasında gezinti tuşlarında sadece ilk kayıt tuşu stabil çalışıyor. 1,2,3,4 no lu uyelerın kayıtları arasında gezmek için sadece ilk kayıt tuşuna bastığınızda ilk kayda gidiyor sonra son kayıt tuşuna basarsanız 4 nolu uye yerıne 2 nolu uyeye gıdıyor sonra 3 ve 4 numaralı uyelerın kayıtlarına gidiyor oncekı ve sonrakı tuşlarda da farklı sorunlar var."
[vb]Private Sub OncekiKayit_BTN_Click()
If UyeRS.AbsolutePosition = 1 Then Exit Sub
UyeRS.MovePrev
|
Formdan Ado İle Tabloya Kaydedilen Resim, Form Tekrar Açıldığında Yüklenmiyor.
|
Merhaba Resim yolu tabloya ADO ile kaydoluyor Form üstünde de gözüküyor fakat form kapatıp açılınca tabloda kayıtlı olmasına
ragmen Formda götüntülenemiyor. Yardımlarınız için teşekkür ederim.
[vb]Sub AlanDoldur()
ID_TXT = UyeRS(0)
Me.UyeNo_TXT = UyeRS(1)
Me.AdSoyad_TXT = UyeRS(2)
Me.TcNo_TXT = UyeRS(3)
Me.Tabiyeti_TXT = UyeRS(4)
Me.DogumTarihi_TXT = UyeRS(5)
Me.DogumYeri_TXT = UyeRS(6)
Me.AnaAd_TXT = UyeRS(7)
Me.BabaAd_TXT = UyeRS(8)
Me.Cinsiyeti_CBO = UyeRS(9)
Me.OgrenimDurumu_CBO = UyeRS(10)
|
Ado Bağlantılı Form Yuklendiğinde Resim Bağlantı Yolunu Gğsteremiyorum.
|
Merhaba
Ado Bağlantılı Form Yuklendiğinde yada Yeni kayıt butonu tıklandığında Forma Resim Klasörü içindeki "ResimYok" adlı Resim Bağlantı Yolunu gösteremiyorum. Yardımlarınız için teşekkür ederim.
[vb]Private Sub Form_Load()
Dim UyeSql As String
Dim x As Integer
UyeSql = "Select * from T_Uye order by uyeno"
UyeRS.Open UyeSql, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
If UyeRS.RecordCount <> 0 Then
UyeRS.MoveFirst
AlanDoldur
End If
Dim fat As Con
|
Yazar: feraz - Cevaplar: 32 - İzleme: 3603
Kapalı Excel Son Satır No Bulma
|
Merhaba.
Ekteki dosyada kapalı dosyadaki A sütununun son verisini ve satır numarasını bulur.
Kod başka bir forumdan Haluk hocaya aittir sağolsun kendisi.
|
Kayıt Da Insert Into Yerıne Ado Kullanırken Alana Girilecek Değeri Verme
|
Merhaba
Formdan T_UyeHesap tablosuna ıslem turunu Alacak olarak kaydettiğim kayıt işlemini ADO ile kayıt yaparken nasıl tanımlayabilirim. Teşekkürler
'CurrentDb.Execute " insert into T_UyeHesap " & _
' " ( UyeNo,Tarih,IslemTuru, Tutar, Aciklama ) values " & _
" ( " & Me.UyeNo_TXT & ",'" & Me.Tarih_TXT & "','Alacak', '" & Me.Tutar_TXT & "','" & Me.Aciklama_TXT & "')"
'End If
ADO
[vb]Private Sub Kaydet_BTN_Click()
If MsgBox("Girdiğiniz ver
|
Alt Formları Ado İle Kayıt Yapan Forma Bağlama Hakkında
|
Merhaba
F_Sporcular Formum da 2 adet Alt formum var. Form ado ile kayıt yaparken alt formlara girilen kayıtlarında F_Sporcular formundakı TC Numarası gırılmıs sporcuya bağlanmasını ve F_Sporcular Formunda kayıtlar arasında gezerken alt formlarda Formdaki sporcuya ait bilgilerin gelmesini sağlamaya çalışıyorum. Bu bağlantı nasıl yapılabilir. Yardımlarınız için teşekkürler.
[img]https://resim.accesstr.net
|
Ado 'le Kayit Runtime 3001 Hatasi
|
Merhaba
Otomatik sayi olan ID alaninda ADO ile kaydet tiklandığında hata aliyorum. Çözümü konusunda bilgi vermenizi rica ederim.
[Resim: https://resim.accesstr.net/do.php?img=9873]
b-
[Resim: https://resim.accesstr.net/do.php?img=9874]
c-
[Resim: https://resim.accesstr.net/do.php?img=9875]
d-
[Resim: https://resim.accesstr.net/do.php?img=9876]
[vb]Dim rstkayit As ADODB.Recordset
Dim strSQL As String
strSQL = "SELECT * FROM T_GelenEvrak "
Set rstkayit = New ADODB.Recor
|
Ado İle Kapalı Dosyaya Şartlı Kayıt
|
Arkadaşlar merhaba,
Çalışma kitabımda "RAPOR" sayfası "G" sütununda tarihler mevcut, Bu tarihlerden bugüne eşit olanları bulup ilgili satırı "C:/" deki YEDEK.xlsx kitabında "LOJİSTİK" sayfasına son boş satıra kaydetmesi için kod bloğuna ihtiyacım var.
Desteklerinizi rica ediyorum.
|