Skip to main content

AccessTr.neT


İff de merak ettiğim

accestr seven
accestr seven
15
4610

İff de merak ettiğim

Çözüldü #7
Sn BlackEagle size de teşekkür ederim.Değerli Yöneticiler Dosyamı gönderecektim.Dosya ekle butonunu göremedim.Sadece resim ekle butonu var.Bu aşamada nasıl dosya gönderecem Saygılar
accestr seven, 26-05-2010 tarihinden beri AccessTr.neT üyesidir.
Son Düzenleme: 16/11/2011, 14:30, Düzenleyen: accestr seven.
Cevapla
Çözüldü #8
Örnek dosya eklemeyi tekrar dener misiniz?
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla
Çözüldü #9
Sn Seruz Düzenleme yaparsanız sevinirim.Dosya ektedir Saygılarımla
.rar IFF_DENEME.rar (Dosya Boyutu: 29,69 KB | İndirme Sayısı: 4)
accestr seven, 26-05-2010 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #10
Buyrun, Profil tablosu oluşturdum ve KISILER tablosuna bu tabloyla bağlantıyı sağlayan Profil_ID alanını ekledim.
KISILER tablosundaki Adres_iletisim_Profil alanını kaldırıp bunun yerine Profil_ID alanını doldurmanız yeterli.
.rar IFF_DENEME_Seruz.rar (Dosya Boyutu: 32,84 KB | İndirme Sayısı: 16)
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla
Çözüldü #11
bu örnekteki
cntc modülündeki
Kod:
Function Concatenate(pstrSQL As String, Optional pstrDelim As String = ";") As String

On Error GoTo hata

    Dim db As DAO.Database
    Dim rs As DAO.Recordset
    Set db = CurrentDb
    Set rs = db.OpenRecordset(pstrSQL)


    Dim strConcat As String 'build return string
    With rs
        If Not .EOF Then
            .MoveFirst
            Do While Not .EOF
                strConcat = strConcat & .Fields(0) & pstrDelim
                .MoveNext
            Loop
        End If
        .Close
    End With
    Set rs = Nothing
    Set db = Nothing
    If Len(strConcat) > 0 Then
        strConcat = Left(strConcat, Len(strConcat) - Len(pstrDelim))
    End If
    Concatenate = strConcat
hata:
    Exit Function
End Function

ne işe yarıyor
@benbendedeilem
Cevapla
Çözüldü #12
Sn Seruz teşekkür ederim ilginize
Merak ettiğim şey şu.
Profil ID düzenlemişsiniz.Ben herhangi bir yeni kişi kaydettiğimde ,bu kişinin Profil ID nedir ? Bunu nasıl bulacam.Herhalde , Dönüp ana tabloya bakıp oradaki numarayı elle girecem.Girmem gereken ID numararası için kolay bir seçenek var mıdır?
Yoksa bu iki tabloyu birleştirmem mi gerekiyor.Bunu biraz daha kolay hale getirebilirmiyiz? Saygılar
Teşekkür ederim.



accestr seven, 26-05-2010 tarihinden beri AccessTr.neT üyesidir.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task