ایجا جدول در اکسس از طریق VB

[hbi]

اگر بخواهم در VB از دستورات اکسس استفاده کنم چگونه است ؟
یک جدو در بانک اطلاعاتی اکسس دارم میخواهم جدولهایی شبیه آن ایجاد کنم البته با کد نویسی در VB
Ba Tahskor :strange:

[hmm]

فرض کنید یک جدول t1 دارید و روی آن میخواهید جدول t2 رو بسازید
الف ) اگه تمام اطلاعات t1 هم میخواهید داشته باشید بصورت زیر عمل کنید


select * into t2 from t1

ب) اگه میخواهید جدول دوم بدون اطلاعات باشد بصورت زیر عمل کنید


select * into t2 from t1 where 1=2

بجای where هر شریط دیگری که صحیح نباشد را میتوانید بنویسید
لازم بذکر است که از روشهای دیگه مثل adox هم میتوان همین کار رو انجام داد که کمی پیچیده تره
موفق باشید

[hbi]

جناب hmm میشه لطفا دستورات را کمی توضیح دهید

[vbprogramer]

بابا دیگه از این واضح تر بگه بنده خدا


select * into t2 from t1
t2 نام همون Tabel که شما می خواهید بسازید و t1 نام Table موجود شما هست دیگه :)

[hbi]

میبخشید ام باز هم نشد
در VB برای ارتباط با بانک اکسس از ADO استفاده کرده ام حالا میخواهم از یک جدول کپی تهیه کنم روش بالا ار امتحان کردم نشد لطفا بیشتر توضیح دهید :گیج:

[شفیعی]

سلام
دوست عزیز ادرس زیر را نگاه کن یک برنامه آن هست شاید بدرد بخورد
http://www.barnamenevis.org/forum/viewtopic.php?t=11307&postdays=0&postorder=asc&start=10

[hbi]

میبخشید اما نمیدانم چگونه دستور ایجاد جدول را در VB به کار برم

[vbprogramer]

شما میتونی از یک جدول Select کنی یا نه؟
اگه شما بتونی select کنی نباید مشکلی داشته باشی ولی اگه طریقه select کردن رو بلد نباشی که دیگه بحثش فرق میکنه.
این هم مثل همون select یا هر دستور SQL دیگه ای که شما استفاده میکنید کار میکنه

z="select * into t2 from t1 "اول اون رو در یک متغییر ذخیره میکنید و بهد هم با یک Record که از قبل تعریف کرده اید بازش میکنید

record1.open z,ado,1,2

[hbi]

Adodc1.RecordSource = "select * into t2 from Asli"
Adodc1.Refresh
بعد از Refresh خطا میدهد اما جدول را ایجاد میکند ولی نمیدانم خطای ان را چگونه برطرف کنم

[hmm]

شما مستقیم با شی ado کار کن نه با adodc

[hbi]

شی ado را از کجا بیارم
میشه بیشتر توضیح دهید :cry:

[vbprogramer]

از قسمت Component گزینه Microsoft Ado Data Control 6.0 SP4 را انتخاب کن تا عنصر Ado به برنامه ات اضافه شود سپس متغییر هایی از نوع Connection , Recordset تعریف کن و بعد بقیه ماجرا

تعریف متغییر

Dim ado1 As New ADODB.Connection
Dim record1 As New ADODB.Recordset


موفق باشی :wink:

[hbi]

کامپونت بالا را نوغ oledb را دارم نه موردی را کع شما گفته اید میشه راهنمایی کنید یا اگر امکان دارد برایم بفرستید :embr: :embr:

[hmm]

شما ابتدا لازمه که ado رو یادبگیرید

[vbprogramer]

اسم درست آن هم همین است یعنی همراه با oledb

Microsoft Ado Data Control 6.0 (SP4) (oledb)

حالا اگر هم نداری برات میفرستم :sunglass:

البته فرمایش جناب hmm هم کاملاْ صحیح است :)

[hbi]

کامپونت گفته شده را از نوع oledb دارم نه sp4 اگر امکان دارد راهنماییم کنید یا اگر میشود ان را برای دانلود در سایت فرار دهید

[vbprogramer]

ای بابا گذاشتم که

حالا زیاد گیر به اونش نده با ado بلدی کار کنی یا نه ؟

[MM_Mofidi]

اینم خالق کد ساخت جدول از روی جدول موجود.
نوشته شده توسط Babak Zawari

[hbi]

میبخشد
adodc را بلدم و همیشه از ان استفاده میکنم

[vbprogramer]

اگه شما اونو نداشتی چه جوری استفاده میکردی؟ :sunglass:

[hmm]

ado با adodc فرق میکنه
یکی ابزار برای دسترسی به اطلاعاته یکی روش
این دو با هم تفاوت داره

[hbi]

جناب hmm میشه بیشتر توصیح بدی من میخوام این برنامه را اجرا کنم چون به شدت نیاز به ان دارم

[hbi]

جناب MM_Mofidi من یک ocx میخوام ان هم ado میشه بگید این چی

[hmm]

عرض کردم نمیشه اونرو با چند خط توضیح داد
لازمه که کتابشو مطالعه بفرمائید

[hbi]

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

[MM_Mofidi]

ببین عزیز جان شما با استفاده از برنامه کد خلق جدول مورد نظر را بدست می آورید با فراخوانی آن کد در یک ماژول میتوانید جدول ر خلق کنید فکر نمیکنم اگه آشنایی متوسطی با این مباحث داشته باشیددجار مشکل شوید اگر مشکل خاصی دارید سوال خود را مشخصا (خاص نه عام) بیان کنید.