AccessTr.neT
LineNumber Lütfen Kodu Deneyin - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: LineNumber Lütfen Kodu Deneyin (/konu-linenumber-lutfen-kodu-deneyin.html)



LineNumber Lütfen Kodu Deneyin - Ziya Guven - 02/03/2012

alt formda LineNumber kodu arıza yapınca aşağıdaki kodu yazdım yine hata veriyor sizde hata veriyormu bana yazarmısınız.
bir örnek yolluyorum
düzgün çalışırsa kullanırız


Option Compare Database
'Bu Haliyle Çalışıyor Ama Form Yüklenince Otomatik vermesini isteyince yeni kayda gidiyor ve hata veriyor
Private Sub Komut65_Click()
Dim i As Long
If Status <> acDeleteOK Then Exit Sub

With Me.Recordset
.MoveLast
For i = .RecordCount To 1 Step -1
.Edit
'AltFormda SıraNo Metin Kutusu Tablodan kayıt kaynağı var
Me.SıraNo = i
.Update
.MovePrevious
Next
End With
End Sub[vb]
Ek Dosyalar
 LineNum.rar(20.34 KB)



Cvp: LineNumber Lütfen Kodu Deneyin - alpeki99 - 02/03/2012

Bende bir problem olmadı.

Win 7 32 Bit Ultimate Türkçe
Office 2010 32 Bit İngilizce


Cvp: LineNumber Lütfen Kodu Deneyin - Ziya Guven - 02/03/2012

teşekkürler hocam bu kodun geliştirilmesi lazım galiba

alttaki kodu ekleyince hata oluyormu birde öyle baksanız
komut düğmesine koyunca benimkide çalışıyor ama bu kod hata veriyor

Private Sub Form_Current()
Dim i As Long
If Status <> acDeleteOK Then Exit Sub

With Me.Recordset
.MoveLast
For i = .RecordCount To 1 Step -1
.Edit
'AltFormda SıraNo Metin Kutusu Tablodan kayıt kaynağı var
Me.SıraNo = i
.Update
.MovePrevious
Next
End With
End Sub



Cvp: LineNumber Lütfen Kodu Deneyin - ozanakkaya - 04/03/2012

Kodu Formun geçerli olduğunda olayına ekledim, hata veriyor mu deneyiniz.

Ek Dosyalar
 LineNum_sled.rar(17.14 KB)



Cvp: LineNumber Lütfen Kodu Deneyin - Ziya Guven - 07/03/2012

teşekkür ederim
iş yerindeyim kod gayet güzel çalışıyor ama evde aynı kod hata veriyor
sistemde bir gariplik var ofisi yeniden yükledim yine düzelmedi.
çocuklar ağ üzerinden çalışan oyun kurunca oldu kodun içindeki loop komutu sanki çalışmaya devam ediyor boş kayda gelince hata veriyor. windowsun ayarlarıyla ilgili birşey sanırım