Formda metin Kutusuna Girilen sayı adedince

1 2 3
25/02/2015, 11:14

53rize

Ekteki dosyada Formdaki Hisse adedi metin kutusuna girdiğim sayı miktarı kadar o andaki formdaki bilgileri ana tabloya girdiğim sayı miktarınca kopyalayabilirmi. teşekkürler.
25/02/2015, 11:41

aydın3838

selam

Kod:
'referans 2003
'kodları çalıştırmadan bu referansı eklemelisiniz
'microsoft activex data object 2.1 library  - adodb.connection
References.AddFromFile ("c:\Program files\common files\system\ado\msado21.tlb")

Kod:
Dim rs As New ADODB.Recordset
Dim i As Integer
Dim zsayi As Integer

Public Sub aaa()
zsayi = 10
rs.Open "tablo1", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
For i = 1 To zsayi Step 1
rs.AddNew
rs("alan1") = "a"
rs("alan2") = "b"
rs.Update
Next i
Set rs = Nothing
End Sub
25/02/2015, 11:52

53rize

Anlayamadım. Oradaki kodları metin kutusunun içindeki kod kısmınamı ekleyeceğiz. Birde benim gönderdiğim dosyayı gönderdim görünmüyor. tekrar göndermeyi deneyeceğim. teşekkürler.
25/02/2015, 12:40

aydın3838

selam
tablo ve form yapılarınız bu yapıya uygun değiller formda biraz araştırma yapmalısınız
ek dosyayı incelediğinizde anlayacaksınız 
saygılar

dosya ekte
25/02/2015, 13:14

53rize

ben acceste ileri seviye bilgim olmadığından tam ne yapacağımı anlayamadım.
Kod:
'referans 2003
'kodları çalıştırmadan bu referansı eklemelisiniz
'microsoft activex data object 2.1 library  - adodb.connection
References.AddFromFile ("c:\Program files\common files\system\ado\msado21.tlb")
bu referansı nereden ve nasıl nereye eklemeliyim. Yeniden bilgilendiriseniz sevinirim. teşekkürler.
25/02/2015, 13:26

aydın3838

örnek uygulamayı incelediniz mi ?
1 2 3