تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيف يتم ربط البرنامج بقاعدة اكسيس عن طريق ملف نصى ؟؟؟
#1
السلام عليكم ورحمة الله وبركاته
كيف يتم ربط البرنامج بقاعدة اكسيس عن طريق ملف نصى  بدل Module؟؟؟
بحيث يتم تغيير الاتصال بقاعدة البيانات بالتعديل فى الملف النصى بدل الدخول الى البرنامج وتعديل Module الذى يحتوى على الرباط
الرد }}}
تم الشكر بواسطة:
#2
ما هو كود الاتصال
الرد }}}
تم الشكر بواسطة:
#3
(21-11-15, 11:20 PM)HASAN6.0 كتب : ما هو كود الاتصال

Public constr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Application.StartupPath + "\main.accdb;Jet OLEDBBig Grinatabase Password=123456;"
الرد }}}
تم الشكر بواسطة:
#4
ضع ملف نصي بجانب البرنامج اسمه Path.txt مثلاً

اكتب السطر الاول اسم قاعدة البيانات
والسطر الثاني الرقم السري

واكتب الFunction التالي
كود :
Public Function ConnectionString() As String
       Dim list As New List(Of String)
       Using r As StreamReader = New StreamReader(Application.StartupPath & "\path.txt")
           Dim line As String
           line = r.ReadLine
           Do While (Not line Is Nothing)
               list.Add(line)
               line = r.ReadLine
           Loop
       End Using
       Return "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Application.StartupPath + "\" & list(0) & ";Jet OLEDBBig Grinatabase Password=" & list(1) & ";"
   End Function

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       MsgBox(ConnectionString)
   End Sub
الرد }}}
تم الشكر بواسطة:
#5
بارك الله فيك اخى
اشكر على مجهودك جعله الله فى ميزان حسناتك

كما انى وجدت طريقة اخرى فى مشاركة سابقة للاخ mbk2006
http://vb4arb.com/vb/thread-12375.html
الرد }}}
تم الشكر بواسطة: HASAN6.0
#6
يمكنك ايضاً حفظ اسم قاعدة البيانات والرقم السري في الـ Registry
كودالحفظ
savesetting("AA","BB","CC",databasePath)
كود الاسترجاع
GetSetting("AA", "BB", "CC")
الرد }}}
تم الشكر بواسطة:
#7
بدلا من استخدام ملف نصي الأفضل أن تضع ConnectionString في  App.config و هذا ما تنصح به مايكروسوفت لحماية ConnectionString

ولتنفيذ ذلك عليك ان تفتح ملف App.config من داخل الفيجوال استوديو ثم تضيف ConnectionString و سيكون شكل الملف في النهاية كالتالي



PHP كود :
<?xml version="1.0" encoding="utf-8" ?>
<configuration>
  
    <startup>
        <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.5" />
    </startup>


  <connectionStrings>
    <add name="ProjectConnectionString"
        connectionString="Data Source=.;Initial Catalog=MyDatabase;Integrated Security=True"
        providerName="System.Data.SqlClient" />
  </connectionStrings>

</configuration> 


و لاسترجاع Connection String عليك استخدام الكود بالشكل التالي:
او بالطريقة التي تريدها
لا تنسي فقط ان تضيف فضاء الاسماء System.Configuration الي مشروعك


PHP كود :
   Private ReadOnly Property ConnectionString As String
        Get
            Return ConfigurationManager
.ConnectionStrings("ProjectConnectionString").ConnectionString
        End Get
    End Property 
الرد }}}
تم الشكر بواسطة:
#8
HASAN6.0
silverlight
بارك الله فيكم شباب
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] أتمنى اجابة وافية:عمل برنامج بقاعدة بيانات SQL دون حاجة تثبيت SQLSERVER dr.programming 6 601 19-03-24, 08:56 AM
آخر رد: سلامه محمد11
  مشكلة عند نقل البرنامج من فيجوال 2013 الى فيجوال 2017 strongriseman 5 149 12-03-24, 10:37 AM
آخر رد: strongriseman
  محتاج تشفير فيديو وتشغلية عن طريق البرنامج فقط new_programer 1 112 22-02-24, 12:09 PM
آخر رد: AHMED213
  التحقق من خلال محتوى خلية عن طريق textbox صالح عبدالله 2 222 24-01-24, 12:54 PM
آخر رد: صالح عبدالله
  مطلوب كود الطباعة لهذا البرنامج melad2002 2 234 13-01-24, 06:42 PM
آخر رد: melad2002
  مشكلة تعليق البرنامج في حال عدم وجود ماسح ضوئي متصل بالكمبيوتر صالح عبدالله 1 210 09-01-24, 10:51 PM
آخر رد: صالح عبدالله
  جملة الاتصال بقاعدة البيانات اكسس محمد خيري 4 364 12-12-23, 03:14 AM
آخر رد: محمد خيري
  حل مشكلة بعد تثبيت البرنامج في جهاز العميل Adel27213 3 467 02-12-23, 11:00 PM
آخر رد: justforit
  كود الاتصال بقاعدة البيانات sqlserver strongriseman 2 421 29-11-23, 09:25 PM
آخر رد: العتيق
  [سؤال] اريد تغيير اسم حقل ضمن جدول بقاعدة بيانات اكسس mh66 1 360 08-11-23, 08:16 AM
آخر رد: justforit

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم