ايران ويج

نسخه‌ی کامل: مشکل در ساختن تیبل و گزارش گیری، خیلی مهمه کمکم کنید
شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.
با سلام
می خوام یک برنامه بنویسم که داخلش مشتری رو تعریف کنم یعنی طوری که هر مشتری 1 تیبل داشته باشه و چند فیلد (نام ، آدرس، تلفن ...) ، کدی رو می خوام که بتونم تیبل رو توی دیتابیس درست کنم همراه با فیلد ها


بعد برای گزارش گیری هم کدی رو می خوام که مثلا از کامبو بکس نام مشتری رو انتخاب کنم و با زدن دکمه گزارش گیری از همون تیبل مربوط به همان مشتری برام گزارش گیری کنه

خیلی واسم مهم اگه سورسش باشه که بهتر اگر هم تیکه کدها هم باشه کافی
با تشکر
سلام
با sql یا acsess؟
در ضمن با چه زبان برنامه نویسی؟؟؟؟؟؟؟؟//
منظورتون اینه که می خواین در موقع اجرا جدول بسازید یا در موقع اجرا فیلد اضافه کنید یا رکورد؟؟؟؟؟؟؟؟؟
در ضمن می خواین به ازای هر مشتری جدول جدیدی داشته باشید یا رکورد جدید؟؟؟؟؟؟؟؟؟؟
توی وی بی ، موفق شدم جدول درست کنم و فیلد درست کنم یعنی کدشو پیدا کردم حالا می خوام فیلد ها رو مقدار دهی کنم چطوری ؟

Dim ADOXcatalog As New Catalog
Dim ADOXtable As New Table
Dim ADOXindex As New ADOX.Index

Private Sub Command1_Click()

ADOXcatalog.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " & App.Path + "\Database.mdb"
ADOXtable.Name = Text2.Text
ADOXtable.Columns.Append "Column1"
ADOXtable.Columns.Append "Column2"
ADOXtable.Columns.Append "f"
ADOXcatalog.Tables.Append ADOXtable

errhandler:
If Err.Number = -2147217897 Then
MsgBox "Database already exists", vbCritical, "Error"
ElseIf Err.Number <> 0 Then
MsgBox Err.Description & vbCrLf & "Operation not complete", vbCritical, "Error"
End If

Set ADOXtable = Nothing
Set ADOXindex = Nothing
Set ADOXcatalog = Nothing

End Sub

کدی که بتونم فیلد ها رو مقدار دهی کنم رو می خوام
گزارش گیری از هر تیبل مورد نظر هم با کد می خوام
با تشکر nilda ممنون که پاسخ دادی