سلام به همه دوستان.
من یه فایل اکسس دارم. توی اون یه کوئری از 3 تا جدول ایجاد میکنم.حالا میخوام اطلاعات این کوئری رو توی یه فایل دیگه و یک جدول ذخیره کنم.کسی میتونه کمکم کنه.ممنون میشم
سلام به همه دوستان.
من یه فایل اکسس دارم. توی اون یه کوئری از 3 تا جدول ایجاد میکنم.حالا میخوام اطلاعات این کوئری رو توی یه فایل دیگه و یک جدول ذخیره کنم.کسی میتونه کمکم کنه.ممنون میشم
کسی نبود به ما جوابی بده
به لینک زیر مراجعه کنید
https://barnamenevis.org/showthread.p...8C%DA%AF%D8%B1
ممنونم جناب امیری.لطف فرمودید. به لینک سر زدم.ولی چیزی ازش دستگیرم نشد.اگر دوستان یه نمونه کوچیک بزارن ممنون میشم.فقط میخوام نتیجه یه کوری توی یه فایل دیگه و یه جدول ذخیره بشه.خیلی گیرم.ممنون میشم کمکم کنید
فرض کنیم کوئری ایجاد شده نامش Query1 باشد و آدرس فایل مقصد شما در متغیر strExternalAccessPath و نام جدول مقصد هم Table1 باشدبه لینک سر زدم.ولی چیزی ازش دستگیرم نشد
strExternalAccessPath = "C:\MyProjects\MyAccessFile.mdb"
CurrentDb.Execute "INSERT INTO Table1 IN '" & strExternalAccessPath & "' SELECT * FROM Query1"
با عرض شرمندگی این کدا رو باید کجا بنویسم.(میدونم سوال خنده داری بود)ولی .......
کسی نبود به ما جوابی بده.راستی یادم رفته بگم
برای ذخیره سازی فایل و جدولی وجود نداره.خودش باید ساخته بشه
کدهای زیررا در روال Clickیک باتن کپی کنید.
Sub CreateNewDB_CopyQdfInTdf()
Dim MyWs As Workspace
Dim Mydb As Database
Dim strExternalAccessPath As String
Set MyWs = DBEngine.Workspaces(0)
strExternalAccessPath = "c:\MyAccessFile.mdb"
If Dir(strExternalAccessPath) <> "" Then
Kill strExternalAccessPath
End If
Set Mydb = MyWs.CreateDatabase(strExternalAccessPath, dbLangGeneral)
Mydb.Close
Set Mydb = Nothing
CurrentDb.Execute "SELECT Q1.* INTO Table1 IN '" & strExternalAccessPath & "' FROM Q1"
End Sub
مرسی دوست عزیز زحمت کشیدید.فرمایشات شما رو انجام دادم.فایل جدید ایجاد میشه ولی جدولی توش ساخته نمیشه.یه ارور هم میده که تو تصویر پیوست گذاشتمUntitled.jpg
واقعا نمیدونم مشکل چیه خیلی هم گیرم
نبود یاری کننده ای
مطمئن نیستم ولی احتمالا شما در کوئری فیلد Attachments دارید . اگر اینطور است بنده فعلا راه حلی ندارم باید هرکدام ازدوستان اطلاع دارند ویا حوصله جستجو وایجاد راه حل ، کمک کنند.
بله قربان.همچین فیلدی رو دارم