Merhaba,

Prosedurun oluşturacağı text dosyası ayraç karakteri "|"

[code=vba]
Option Explicit
Option Base 0

Sub ACCESS_DB_ANALIZ()
'==== ZEKİ GÜRSOY 2010 © ====

Dim con As New ADODB.Connection
Dim rs As New ADODB.Recordset

Dim props As ADODB.Properties
Dim prop As ADODB.Property

Dim arr$(), byt As Byte, j%

On Error Resume Next

con.Open _
"provider=microsoft.jet.oledb.4.0;data source=" & _
"C:\Program Files\Microsoft Office\OFFICE11\SAMPLES\Nort

Değerli arkadaşlar. Aşağıdaki kod ile T_Puantaj tablosundan Kayit_No'ya göre(Otomatik Sayı) Listboxtan seçtiğim personeli TextBoxlara alabiliyorum.

Benim ihtiyacım olan Kayit_No(Otomatik Sayı) ile değilde Adi_Soyadi ile kayıtları textboxlara almak. Acaba bu mümkünmüdür.

Kullandığım Kod;
[code=vba]Public Sub veribilgisial()
Dim rs As ADODB.Recordset
Dim strSQL As String
strSQL = "SELECT * FROM T_Puantaj WHERE Kayit_No = " & Liste1.Column(0)
Set rs = CreateObject("ADODB.Recordse

Merhaba
Ado kullanarak verileri çekerken.
rs.open "select........." diye başlayan kayıt kümesini döngüye girerek 5 bin veya 10 bin veya dağa fazla açıp kapamak bir sakınca doğrurmu?Mesela işlemci sakatlanırmı?Veya windows kilitlenirmi?Veya Program göçermi?Veya veritabanının başına bir hal gelirmi?
Teşekkür ederim.

ADO nedir?

Neden ADO?

(ActiveX Data Object( X Microsoft ürünlerinin çalışması için bir simge, çalışır Veri Nesnesi)

“ADO” basit olarak; Veriye erişebilmek için seçilen yoldur.” . Bu teknoloji yeni bir teknoloji değildir, uzun zamandır kullanılmakta olan ve gelecekte de kullanılacak olan bir teknolojidir.

Object Oriented (Nesne yönelimli) program geliştirme araçlarında genellikle ne

Merhaba.
Sadece mükerer kayıtları listelemek istiyorum.
Örnek:
Ahmetten bir tane varsa listelemeyecek.
Mehmetten birden fazla varsa 1 tane listeleyecek.
Bunun gibi sadece mükerer olanları teke indirip gösterecek.
İsimler isim alanındadır.
Teşekkür ederim.

selamlar veri tabnını projeden ayırdım ve şifreledim dışarıdan müdahale edilmemesi düşüncesi ile
fakat kayıt sırasında şifreyi açıp işlem bitiminde kilitlemesi için ne yapılabilir

Public Sub TEMP_KAYIT()
Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
cn.Provider = "Microsoft.Jet.OLEDB.4.0"
cn.Open "Data Source='" & Application.CurrentProject.Path & "\Temp_Dosyası.mdb'"
Dim rs As New ADODB.Recordset
rs.Open "Tablo_Temp", cn, adOpenKeyset, adLockOptimistic
rs.AddNew
rs(1) = M

Sayın hocalarım; ekteki dosyada verileri liste kutusuna alırken öğretim yılına göre filtreleyerek almak istiyorum. Daha sonrada yine öğretim yılına göre filtrelemek istiyorum.

http://social.msdn.microsoft.com/Forums/...42a236fef7

http://msdn.microsoft.com/en-us/library/...10%29.aspx

anladığım kadarıyla ado kısır kalıyor access için ve de hep öyle kalcak gibi. Sizlerin görüşlerini merak ediyorum!

[color=#4B0082][size=small][font=Verdana]Selamlar sevgili Access-SQL.com sakinleri,böyle diyesim geldi

Bilmem olur mu bu saate yazdım, acilen/mutlaka böyle bir şeye ihtiyacım vardı. Olmasını ümit ediyorum çünkü Access'te iş verilerle çalışmak olunca SQL ve ADO ile yapılamaz olup da VBA ile olacaksa tuhaf olurdu.

İlginç sorum şu:

Birbirine UstId alanıyla bağlı kayıtlarım var. Bu tablo yerine göre hiyerarşik yapıda her şey barındıra

merhabalar
ben sonradan öğrenme programcı olmaya çalışıyorum
access yardımıyla ado bağlantısı oluşturmak istiyorum.
mümkün mü? yardımcı olabilir misiniz?