آوردن اطلاعات از جدول ديگه

[navardi]

سلام دوستان
من ميخوام در subform مثلا وقتي شماره پرسنلي شخصي را ميزنم بر اساس اين شماره اتومات برود در جدول مثلا كد ملي كه وجود دارد كد ملي اين شماره پرسنلي را بياورد و در جدول اين فرم و ساب فرم نيز قرار گيرد نمونه ساده همچين فايلي را ميذارم البته تاكيد ميكنم من در subform همچين كاري را نياز دارم با dlookup ميارم اما در جدول مربوطه نميريزه لطفا راهنمائي كنيد با تشكر107201

[navardi]

با سلام
آيا كسي سوالم را متوجه نشده يا اينكه كسي بلد نيست تا كمك كنه؟

[navardi]

قبلا خيلي سريعتر آدم جواب سوالشا تو اين تاپيك ميگرفت ولي اينگار اساتيد كم لطف شدند

[navardi]

با سلام خدمت دوستان و اساتيد محترم
آيا اينكار را ميشه با كد نويس انجام داد و اگه جواب مثبته امكان داره راهنمائي بفرمائيد
ممنونم

[com12151337]

سلام
یک کمبو در فرمت ایجاد کن و این دستور را در رویداد on clickبنویس
Private Sub Combo4785_Click()
With Combo4785
If Not IsNull(Combo4785) Then
lastname = .Column(2)
firstname = .Column(1)
father = .Column(3)
poste_sazmani = .Column(4)
vazeyat_skonat = .Column(5)
Else
lastname = ""
farstname = ""
father = ""
poste_sazmani = ""
vazeyat_skonat = ""

End If
End With

End Sub