Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
02/03/2012 01:28
Konu Sahibi
Ziya Guven
Yorumlar
4
Okunma
1177
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

Ziya Guven

Üye
Kullanici Avatari
Üye
20
5
27/01/2012
10
Ordu
Ofis 2003
13/11/2012,12:09
Çözüldü 
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


Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
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]


Cevapla

alpeki99

Düşünmek en zor iştir...
Kullanici Avatari
Uzman
O....
6.092
29/10/2008
Bursa
Yazılım Geliştirici
Ofis 2010 32 Bit
20/10/2017,09:01
Çözüldü 
Bende bir problem olmadı.

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


AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla

Ziya Guven

Üye
Kullanici Avatari
Üye
20
5
27/01/2012
10
Ordu
Ofis 2003
13/11/2012,12:09
Çözüldü 
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

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
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


Cevapla

ozanakkaya

sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.879
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Bugün,08:25
Çözüldü 
Kodu Formun geçerli olduğunda olayına ekledim, hata veriyor mu deneyiniz.

Ek Dosyalar
LineNum_sled.rar
[17.14 KB]


Cevapla

Ziya Guven

Üye
Kullanici Avatari
Üye
20
5
27/01/2012
10
Ordu
Ofis 2003
13/11/2012,12:09
Çözüldü 
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


Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Dlookup Kodu Hatası accessdelisi 3 148 14/10/2017, 07:52 accessdelisi
Çözüldü Cari baş harfine göre firma kodu oluşturma hakkında Gokcen Akan 25 1.072 14/07/2017, 08:32 Gokcen Akan
Çözüldü Aktifse Kodu Kullan... blue_wall 6 429 07/07/2017, 10:31 blue_wall
Çözüldü İyelik Eki Vba Kodu sadooo 5 289 23/06/2017, 00:05 idrisy
Çözüldü Personel Avans İzin Takip Ödev Konusu Acill Lütfen ankaram 11 679 31/05/2017, 15:22 atoz112

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.