اکسنا | آموزش تخصصی و رایگان اکسس

🟢 با توجه به درخواست شما عزیزان گروه VIP اکسنا در دو سطح راه اندازی شد : 🟥 گروه VIP سطح مقدماتی ⁉️ موضوع : جهت پرسش و پاسخ به سوالات شما در خصوص مباحث آموزشی مقدماتی اکسس 💰 هزینه حضور : ماهیانه مبلغ 75 هزار تومان 🟨 گروه VIP سطح پیشرفته ⁉️ موضوع : جهت پرسش و پاسخ به سوالات شما در خصوص مباحث آموزشی پیشرفته اکسس و کدنویسی در محیط VBA 💰 هزینه حضور : ماهیانه مبلغ 150 هزار تومان 💯 مجموعه اکسنا همواره در تلاش است تا با بهبود مداوم طراحی و تجربه کاربری خود و همچنین پشتیبانی مناسب، بهترین تجربه را برای علاقه مندان به اکسس رقم بزند. ❇️ ادعا نمیکنیم که بهترینیم، اما مفتخریم که بهترین علاقه مندان به اکسس را داریم. 🌐 با اکسنا، اکسس را حرفه ای تجربه کنید. 🔴 کانال آموزشی اکسنا مارکت : دانلود برنامه ها و آموزش های کاربردی اکسس 🆔 @AccenaMarket

📦 کد محصول : 35 💎 عنوان آموزش : طراحی برنامه کدینگ حسابداری ### 1. طراحی بخش گروه حساب ### 2. طراحی بخش حساب کل ### 3. طراحی بخش حساب معین ### 4. طراحی بخش حساب تفصیلی ### 5. طراحی بخش ایجاد، ویرایش و حذف حساب ### 6. آشنایی با طراحی فرم، جدول و کدنویسی در کلیه مراحل ⚖️ حجم : حدود یک گیگابایت 🛍 روش دریافت : دانلود از طریق تلگرام 🎁 نمونه فایل آموزشی : دارد (سورس نرم افزار) | (5:30 فیلم آموزشی) 💵 قیمت : 249 هزار تومان 🌐 با اکسنا، اکسس را حرفه ای تجربه کنید 🔴 کانال آموزشی اکسنا مارکت : دانلود برنامه ها و آموزش های کاربردی اکسس 🆔 @AccenaMarket

📦 کد محصول : 34 💎 عنوان آموزش : کار با ویژگی Tag در برنامه های اکسس ⚖️ حجم : 372 کیلوبایت 🛍 روش دریافت : دانلود از طریق تلگرام 🎁 نمونه فایل آموزشی : دارد (سورس نرم افزار) 💵 قیمت : رایگان 🌐 با اکسنا، اکسس را حرفه ای تجربه کنید 🔴 کانال آموزشی اکسنا مارکت : دانلود برنامه ها و آموزش های کاربردی اکسس 🆔 @AccenaMarket

🟩 ویژگی Tag در اشیاء اکسس ویژگی Tag در اشیاء Microsoft Access مانند فرم‌ها، گزارش‌ها، و کنترل‌ها (مانند دکمه‌ها، متن‌باکس‌ها، و لیبل‌ها) یک ویژگی بسیار کاربردی است که برای ذخیره‌سازی اطلاعات اضافی در مورد شیء مورد استفاده قرار می‌گیرد. این ویژگی به شما امکان می‌دهد مقادیر رشته‌ای دلخواهی را به هر شیء اختصاص دهید، بدون این که بر روی عملکرد ظاهری یا اصلی شیء تأثیر بگذارد. این امر می‌تواند در مواردی مانند تعیین ویژگی‌های دینامیک، نشانه‌گذاری کنترل‌ها برای استفاده‌های خاص، یا حتی به عنوان راهی برای حمل اطلاعات کمکی که در زمان اجرای برنامه مورد نیاز است، مفید باشد. ### مثال استفاده از ویژگی Tag: فرض کنید شما می‌خواهید برخی از متن‌باکس‌ها در فرم خود را به عنوان "مورد نیاز" نشانه‌گذاری کنید تا کاربر مجبور باشد قبل از ارسال فرم، اطلاعاتی را در آن‌ها وارد کند. می‌توانید از ویژگی Tag برای این منظور استفاده کنید. 1. تنظیم ویژگی Tag: در طراحی فرم، برای هر متن‌باکس که می‌خواهید به عنوان مورد نیاز علامت‌گذاری شود، مقدار Tag را به "required" تغییر دهید. 2. بررسی ویژگی Tag در کد VBA: می‌توانید یک تابع VBA بنویسید که قبل از ارسال فرم، همه متن‌باکس‌هایی را که دارای ویژگی Tag برابر با "required" هستند، بررسی کند تا مطمئن شوید که خالی نیستند.

Function ValidateRequiredFields(frm As Form) As Boolean
    Dim ctrl As Control
    ValidateRequiredFields = True
    
    For Each ctrl In frm.Controls
        If ctrl.Tag = "required" And IsNull(ctrl.Value) Then
            MsgBox ctrl.Name & " is a required field and cannot be left blank.", vbExclamation
            ctrl.SetFocus
            ValidateRequiredFields = False
            Exit Function
        End If
    Next ctrl
End Function

3. استفاده از تابع: می‌توانید این تابع را در رویداد BeforeUpdate فرم خود فراخوانی کنید تا قبل از ارسال فرم، همه فیلدهای مورد نیاز بررسی شوند.

Private Sub Form_BeforeUpdate(Cancel As Integer)
    If Not ValidateRequiredFields(Me) Then Cancel = True
End Sub

در این مثال، تابع ValidateRequiredFields همه کنترل‌هایی را که در فرم قرار دارند، مرور می‌کند و چک می‌کند که آیا کنترل‌هایی که ویژگی Tag آن‌ها برابر با "required" است، دارای مقادیر هستند یا خیر. اگر کنترلی خالی پیدا شود، پیامی نمایش داده می‌شود و فرم ارسال نمی‌شود. 🌐 با اکسنا، اکسس را حرفه ای تجربه کنید 🔴 کانال آموزشی اکسنا مارکت : دانلود برنامه ها و آموزش های کاربردی اکسس 🆔 @AccenaMarket

🧠 ذهن را باید هر روز با افکار کوچک ولی زیبا آبیاری کرد، فقط در این صورت به مرور زمان جنس افکار انسان تغییر می‌کند... 🌐 با اکسنا، اکسس را حرفه ای تجربه کنید 🔴 کانال آموزشی اکسنا مارکت : دانلود برنامه ها و آموزش های کاربردی اکسس 🆔 @AccenaMarket

به هر چه عشق بورزى، به آن قدرت می‌دهی. از هر چه بترسى، به آن قدرت داده اى. به هـرچه قدرت بدهى، آن را جذب خواهى كرد ... 🌐 با اکسنا، اکسس را حرفه ای تجربه کنید 🔴 کانال آموزشی اکسنا مارکت : دانلود برنامه ها و آموزش های کاربردی اکسس 🆔 @AccenaMarket

✴️ بررسی وجود یک رفرنس و اضافه نمودن آن به رفرنس های VBA از کد زیر برای بررسی وجود کتابخانه DAO در بخش رفرنس های VBA استفاده می شود :

Sub CheckAndEnableDAOReference()
    Dim ref As Reference
    
    For Each ref In Application.References
        If ref.Name = "DAO" Then
            If ref.IsBroken Then
                Application.References.AddFromFile "C:\Program Files\Common Files\Microsoft Shared\DAO\DAO360.DLL"
            End If
            Exit Sub
        End If
    Next ref
    
    Application.References.AddFromFile "C:\Program Files\Common Files\Microsoft Shared\DAO\DAO360.DLL"
End Sub

این کد به صورت خلاصه، مراجعه به کتابخانه داده های پیوسته (DAO) را بررسی کرده و در صورت عدم وجود یا بارگذاری آن، مراجعه به فایل DAO360.DLL را اضافه می‌کند. حالا به طور سطر به سطر توضیحات این کد را ارائه می‌دهیم: ۱. Sub CheckAndEnableDAOReference() - تعریف یک ماژول زیربرنامه با نام CheckAndEnableDAOReference برای بررسی و فعال‌سازی مراجعه به دیتا‌های پیوسته (DAO). ۲. Dim ref As Reference - اعلام یک متغیر محلی به نام ref از نوع Reference برای استفاده در این ماژول. ۳. For Each ref In Application.References - شروع حلقه‌ی برسی هر مرجع در لیست مراجع برنامه. ۴. If ref.Name = "DAO" Then - اگر نام مرجع فعلی برابر با "DAO" باشد: ۵. If ref.IsBroken Then - اگر مرجع مربوطه شکسته باشد: ۶. Application.References.AddFromFile "C:Program FilesCommon FilesMicrosoft SharedDAODAO360.DLL" - اضافه کردن مرجع به فایل DAO360.DLL در صورت شکست مرجع. ۷. Exit Sub - خروج از زیربرنامه پس از اضافه کردن مرجع شکسته. ۸. Application.References.AddFromFile "C:Program FilesCommon FilesMicrosoft SharedDAODAO360.DLL" - اضافه کردن مرجع به فایل DAO360.DLL در صورت عدم وجود مرجع. 🌐 با اکسنا، اکسس را حرفه ای تجربه کنید 🔴 کانال آموزشی اکسنا مارکت : دانلود برنامه ها و آموزش های کاربردی اکسس 🆔 @AccenaMarket

📦 کد محصول : 33 💎 عنوان آموزش : مدیریت پنجره های فعال در ویندوز ⚖️ حجم : 372 کیلوبایت 🛍 روش دریافت : دانلود از طریق تلگرام 🎁 نمونه فایل آموزشی : دارد (سورس نرم افزار) 💵 قیمت : رایگان 🌐 با اکسنا، اکسس را حرفه ای تجربه کنید 🔴 کانال آموزشی اکسنا مارکت : دانلود برنامه ها و آموزش های کاربردی اکسس 🆔 @AccenaMarket

🟩 نمایش پنجره پایگاه داده در اکسس و انتخاب جدول انتخابی این کد در اکسس برای نمایش پنجره پایگاه داده و انتخاب یک جدول خاص از پایگاه داده استفاده می‌شود:

Sub DisplayDatabaseWindow()
    Dim strDocName As String
    strDocName = "Orders"
    DoCmd.SelectObject acTable, strDocName, True
End Sub

در اینجا کاربرد اصلی این کد به توضیح زیر است: 1. Sub DisplayDatabaseWindow(): - این متد (که به صورت زیر تعریف شده است) برای نمایش پنجره پایگاه داده در اکسس استفاده می‌شود. 2. Dim strDocName As String: - یک متغیر به نام "strDocName" به عنوان یک رشته تعریف شده است که نام جدول مورد نظر برای نمایش را ذخیره می‌کند. 3. strDocName = "Orders": - مقدار "Orders" به عنوان نام جدول قرار داده شده تا در پنجره پایگاه داده نمایش داده شود. 4. DoCmd.SelectObject acTable, strDocName, True: - این دستور به کاربرد acTable (که نوع شیء اکسس از جدول را نشان می‌دهد) و نام جدول مورد نظر که در متغیر "strDocName" ذخیره شده است، اشاره دارد. پارامتر دوم این دستور نام جدول است که باید نمایش داده شود و پارامتر سوم به عنوان "True" راهنمای اعمال تنظیمات انتخاب شیء را نشان می‌دهد. بنابراین، این کد وظیفه نمایش پنجره پایگاه داده در اکسس و انتخاب جدول مشخص از پایگاه داده را برعهده دارد. 🌐 با اکسنا، اکسس را حرفه ای تجربه کنید 🔴 کانال آموزشی اکسنا مارکت : دانلود برنامه ها و آموزش های کاربردی اکسس 🆔 @AccenaMarket

❄️ داشتن رویاهای بزرگ اولین گام در مسیر موفقیت است 📦 کد محصول : 32 💎 عنوان آموزش : آموزش Word Merge در اکسس ### ارسال اطلاعات از Access به سند Word ⚖️ حجم : 145 مگابایت 🛍 روش دریافت : دانلود از طریق تلگرام 🎁 نمونه فایل آموزشی : دارد (سورس نرم افزار) 💵 قیمت : 89 هزار تومان 🛠 روش خرید و پشتیبانی : ارسال تیکت از طریق تلگرام به آی دی 💎 @DrDastgerdi 🌐 با اکسنا، اکسس را حرفه ای تجربه کنید 🔴 کانال آموزشی اکسنا مارکت : دانلود برنامه ها و آموزش های کاربردی اکسس 🆔 @AccenaMarket

🟩 استفاده از تابع IsFormLoaded در اکسس تابع "IsFormLoaded" بررسی می‌کند که آیا یک فرم خاص در Access بارگذاری شده است یا خیر. توضیحاتی در مورد عملکرد این تابع به صورت زیر است: - تابع "IsFormLoaded" با استفاده از نام فرم ورودی، بررسی می‌کند که آیا فرم مورد نظر در مجموعه فرم‌ها در Access موجود است یا خیر. - تابع ابتدا بر اساس نام فرم ورودی استفاده می‌کند تا وضعیت فرم را در سطح سیستم بررسی کند. - اگر فرم در مجموعه فرم‌ها وجود داشته باشد (استفاده از SysCmd با پارامترهای acSysCmdGetObjectState و acForm)، مقدار برگشتی از تابع بزرگتر از صفر خواهد بود (True)، در غیر این صورت مقدار برگشتی برابر صفر خواهد بود (False). - هر خطا در حین اجرای تابع، تابع مقدار برگشتی False را تنظیم می‌کند و خطا را پاک کرده و از طریق عبور به برچسب IsFormLoaded_Exit از تابع خارج می‌شود. از این تابع می‌توان در سایر کدها برای بررسی لود فرم‌ها در Access استفاده کرد که آیا فرم مذکور در حال حاضر باز هست یا خیر.

Public Function IsFormLoaded(ByVal strFormName) As Integer
    
    On Error GoTo IsFormLoaded_Err

    IsFormLoaded = (SysCmd(acSysCmdGetObjectState, acForm, strFormName) <> 0)

IsFormLoaded_Exit:
    On Error GoTo 0
    Exit Function

IsFormLoaded_Err:
    IsFormLoaded = False
    Err.Clear
    Resume IsFormLoaded_Exit

End Function

مثال :

MsgBox IsFormLoaded("frmTime")

در صورتی که فرم در صفحه نمایش باز باشد مقدار True در غیر این صورت مقدار False نمایش داده می شود. 🌐 با اکسنا، اکسس را حرفه ای تجربه کنید 🔴 کانال آموزشی اکسنا مارکت : دانلود برنامه ها و آموزش های کاربردی اکسس 🆔 @AccenaMarket

🟥 استفاده از عبارت "دابل کوتیشن" در کدنویسی جهت استفاده از عبارت "دابل کوتیشن" | "double quotation marks" یا به صورت مختصر "double quotes" | می توانید از تابع DQ به شکل زیر در برنامه های خود استفاده کنید :

Function DQ(vText As Variant) As String

   If IsNull(vText) = False Then
      If InStr(vText, Chr(34)) > 0 Then
         vText = strDReplace(CStr(vText), Chr(34), "'")
      End If
   End If

   DQ = Chr$(34) & vText & Chr$(34)
   
End Function

آرگومان vText به عنوان ورودی تابع استفاده می شود و می تواند یک عبارت را دریافت کند. به عنوان مثال :

MsgBox DQ("Accena")

مقدار خروجی به شکل زیر خواهد بود :

"Accena"

🌐 با اکسنا، اکسس را حرفه ای تجربه کنید 🔴 کانال آموزشی اکسنا مارکت : دانلود برنامه ها و آموزش های کاربردی اکسس 🆔 @AccenaMarket

❇️ دستور SysCmd(acSysCmdAccessVer) در اکسس دستور SysCmd(acSysCmdAccessVer) در اکسس برای بازگرداندن نسخه Access که در حال حاضر در حال اجرا است، استفاده می‌شود. این دستور نسخه عددی Access را در قالب یک عدد برمی‌گرداند. برای مقایسه و بررسی نسخه Access و انجام عملیات مشروط، می‌توان از این دستور استفاده کرد. به طور مثال، اگر شما می‌خواهید عملیات خاصی را بر اساس نسخه Access انجام دهید، می‌توانید از دستور SysCmd(acSysCmdAccessVer) استفاده کنید تا نسخه را بسنجید و با استفاده از شرط‌ها و دستورات مربوطه عمل کنید.

IIf(SysCmd(acSysCmdAccessVer) <= 11, "*.doc", "*.doc*")

🌐 با اکسنا، اکسس را حرفه ای تجربه کنید 🔴 کانال آموزشی اکسنا مارکت : دانلود برنامه ها و آموزش های کاربردی اکسس 🆔 @AccenaMarket

❄️ ممکن است  ❄️ مسئول زمین خوردنت نباشی ❄️ اما مسئول از جا بلند شدنت هستی 📦 کد محصول : 31 💎 عنوان آموزش : آموزش انواع الگوریتم های رمزنگاری و رمزگشایی در اکسس ⚖️ حجم : 85 مگابایت 🛍 روش دریافت : دانلود از طریق تلگرام 🎁 نمونه فایل آموزشی : دارد (سورس نرم افزار) 💵 قیمت : 89 هزار تومان 🌐 با اکسنا، اکسس را حرفه ای تجربه کنید 🔴 کانال آموزشی اکسنا مارکت : دانلود برنامه ها و آموزش های کاربردی اکسس 🆔 @AccenaMarket

🟩 تابع StrConv در اکسس تابع StrConv در اکسس (Microsoft Access)، مانند سایر محیط‌های توسعه و برنامه‌نویسی مایکروسافت، برای تبدیل رشته‌های متنی به حالت‌های مختلف نوشتاری استفاده می‌شود. این تابع می‌تواند رشته‌ها را به بزرگ‌نویسی، کوچک‌نویسی، حالت ترکیبی (که اولین حرف هر کلمه بزرگ است) و یا برای تبدیل میان کدگذاری‌های مختلف متنی به کار رود. استفاده از این تابع به ویژه در پردازش داده‌های ورودی و آماده‌سازی آن‌ها برای ذخیره‌سازی یا نمایش مفید است. نحوه استفاده از تابع StrConv در VBA (Visual Basic for Applications) که زبان اسکریپت‌نویسی اکسس است، به شرح زیر است:

StrConv(string, conversion, [LCID])

- string: رشته‌ای که قرار است تبدیل شود. - conversion: نوع تبدیل که می‌تواند شامل تبدیل به حرف‌های بزرگ، کوچک، ترکیبی و غیره باشد. - [LCID] (اختیاری): شناسه تنظیمات محلی که برای تعیین قواعد تبدیل استفاده می‌شود، مثلاً برای تعیین اینکه کدام حروف باید در حالت ترکیبی بزرگ شوند. مثال‌هایی از استفاده: - تبدیل یک رشته به حروف بزرگ:

StrConv("hello world", vbUpperCase)  ' نتیجه: "HELLO WORLD"

- تبدیل یک رشته به حروف کوچک:

StrConv("HELLO WORLD", vbLowerCase)  ' نتیجه: "hello world"

- تبدیل یک رشته به حالت ترکیبی (هر کلمه با حرف بزرگ شروع می‌شود):

StrConv("hello world", vbProperCase)  ' نتیجه: "Hello World"

این تابع می‌تواند بسیار مفید باشد وقتی که نیاز است داده‌های ورودی را قبل از ذخیره‌سازی یا نمایش، استانداردسازی کنید، مثلاً اطمینان حاصل کنید که همه نام‌ها با حرف بزرگ شروع شده‌اند یا آدرس‌های ایمیل را به حروف کوچک تبدیل کنید تا در پردازش‌های بعدی مشکلی ایجاد نشود.

❄️ به لبخندتان اجازه دهید ❄️ تا دنیایتان را تغییر دهد ؛ ❄️ ولے به دنیایتان اجازه ندهید ❄️ ڪه لبخندتان را تغییر دهد … 🌸 لحظه‌هاتون شادِ شادِ شاد 🙏 زندگیـتون سرشار از آرامــش 📦 کد محصول : 30 💎 عنوان آموزش : آموزش تقسیم پایگاه داده به دو بخش جداگانه (Split Database) ### 1. تقسیم کلیه جداول پایگاه داده در یک بانک اطلاعاتی مجزا ### 2. تقسیم جداول انتخابی پایگاه داده در چند بانک اطلاعاتی مجزا ### 3. ایجاد جدول جهت ذخیره مسیر جداول خارجی لینک شده به برنامه ### 4. ثبت مسیر جداول لینک شده به برنامه در جدول ### 5. بروزرسانی لینک های جداول خارجی ### 6. انتقال جداول به پایگاه داده جاری از طریق لینک های ایجاد شده ### 7. ارتبـاط با بـانک اطلاعاتـی در مسیـر جـدیـد انتخـاب شـده ### 8. آموزش 12 تابع کاربردی ماژول اکسنا ⚖️ حجم : 161 مگابایت 🛍 روش دریافت : دانلود از طریق تلگرام 🎁 نمونه فایل آموزشی : دارد (سورس نرم افزار) 💵 قیمت : 110 هزار تومان 🌐 با اکسنا، اکسس را حرفه ای تجربه کنید 🔴 کانال آموزشی اکسنا مارکت : دانلود برنامه ها و آموزش های کاربردی اکسس 🆔 @AccenaMarket

🟨 چگونه رکوردهای یک کوئری را قابل ویرایش کنیم : علت‌های مختلفی می‌تواند باعث شود که رکوردهای یک کوئری در Access غیرقابل ویرایش شوند. برخی از این دلایل عبارتند از: 1. استفاده از چندین جدول: اگر کوئری شما از چندین جدول استفاده می‌کند، ممکن است به دلیل نوع ارتباط بین جداول (مثلاً یک به چند) رکوردها غیرقابل ویرایش شوند. 2. استفاده از توابع تجمعی: اگر در کوئری از توابع تجمعی مانند SUM، AVG، COUNT و غیره استفاده کرده‌اید، رکوردها قابل ویرایش نخواهند بود. 3. استفاده از DISTINCT یا GROUP BY: اگر در کوئری از DISTINCT یا GROUP BY استفاده کرده‌اید، رکوردها قابل ویرایش نخواهند بود. 4. عدم وجود کلید اصلی: اگر جدول یا جداول شما کلید اصلی نداشته باشند، ممکن است رکوردها قابل ویرایش نباشند. 5. استفاده از UNION: اگر از UNION یا UNION ALL در کوئری استفاده کرده‌اید، رکوردها قابل ویرایش نخواهند بود. برای رفع این مشکل، می‌توانید اقدامات زیر را انجام دهید: 1. بررسی نوع ارتباط بین جداول: اطمینان حاصل کنید که ارتباط بین جداول درست تعریف شده باشد و از نوع یک به چند (One-to-Many) باشد. 2. حذف توابع تجمعی: اگر از توابع تجمعی استفاده کرده‌اید، سعی کنید آنها را حذف کنید یا کوئری را به دو بخش تقسیم کنید: یکی برای محاسبات و دیگری برای نمایش داده‌ها. 3. حذف DISTINCT یا GROUP BY: اگر از DISTINCT یا GROUP BY استفاده کرده‌اید، سعی کنید آنها را حذف کنید. 4. اضافه کردن کلید اصلی: اطمینان حاصل کنید که هر جدول دارای کلید اصلی باشد. 5. جدا کردن کوئری‌ها: اگر از UNION یا UNION ALL استفاده کرده‌اید، سعی کنید کوئری‌ها را جدا کنید و به صورت مجزا استفاده کنید.