یک سوال

[rahapirooz]

با سلام .در یک فرم تعدادی فیلد از جداول مختلف قرار دادم که این جداول با یکدیگر رابطه ندارند.این فیلدها unbuond هستند.(ین فیلدها در هر تب از تب کنترل هستند.)چگونه میتوان هر یک از فیلدها را از طریق کنترل سورس به همان فیلد جدول مربوطه ربط داد.یعنی بعد از وارد کردن داده در هر یک از انها ،داده در جدول مربوطه ثبت شود؟با تشکر(لطفا راهنمایی بفرمایید)

[mohammadsaleh]

با استفاده از ركودست

[rahapirooz]

با سلام.ممنون از پاسخ شما.فقط میشه بیشتر راهنمایی کنید.چطور استفاده کنم.ممنون میشم پاسخ بدید.

[rahapirooz]

دوستان گرامی ممنون میشم راهنمایی بفرمایید.نیاز فوری به این پاسخ دارم.

[rahapirooz]

سلام.دوستان گرامی نیاز فوری به این پاسخ دارم.

[id1385]

به این صورت

Sub Add_Record()
Dim conn As ADODB.Connection
Dim myRecordset As ADODB.Recordset
Dim strConn As String
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & CurrentProject.Path & "\mydb.mdb"


Set myRecordset = New ADODB.Recordset
With myRecordset
.Open "Select * from Employees", _
strConn, adOpenKeyset, adLockOptimistic
.AddNew
!LastName = "Marco"
!FirstName = "Paulo"
!City = "Boston"
.MoveFirst
.Close
End With


Set myRecordset = Nothing
Set conn = Nothing
End Sub

این برنامه رو دانلود کن توش همش به این روش انجام شده
http://barnamenevis.org/showthread.php?221938-%D9%86%D9%85%D9%88%D9%86%D9%87-%D8%A8%D8%B1%D9%86%D8%A7%D9%85%D9%87-%D8%A7%D9%86%D8%A8%D8%A7%D8%B1%D8%AF%D8%A7%D8%B1%D B%8C-%DA%A9%D8%A7%D9%85%D9%84&p=2160842&viewfull=1#post2160842



منبع :
http://www.java2s.com/Code/VBA-Excel-Access-Word/Access/AddingaNewRecordtoaTable.htm




موفق باشید