10-12-22, 08:45 PM (آخر تعديل لهذه المشاركة : 10-12-22, 08:46 PM {2} بواسطة حماده ممدوح البحيرى.)
السلام عليكم
كود :
Public ConStr As String = "Data Source= HAMADA-PC\SQLEXPRESS;Initial Catalog = Mat3amo;integrated security=true"
Public Con As New SqlClient.SqlConnection(ConStr)
كيف يمكن الاعتماد على هذا الكونكشن من خلال ملف تكست خارجى موجود باسم معين داخل ملف السيطب
يعنى ياخوانى
بعد م اقوم بتسطيب الملف التنفيذى لبرنامجى يقوم يبحث عن ملف تكست وليكن اسمه con داخل فولدر اسمه mat3am حيث يفتح ملف التكست ويأخذ الكونكش الجديد بحسب جهاز العميل
(10-12-22, 08:45 PM)حماده ممدوح البحيرى كتب : السلام عليكم
كود :
Public ConStr As String = "Data Source= HAMADA-PC\SQLEXPRESS;Initial Catalog = Mat3amo;integrated security=true"
Public Con As New SqlClient.SqlConnection(ConStr)
كيف يمكن الاعتماد على هذا الكونكشن من خلال ملف تكست خارجى موجود باسم معين داخل ملف السيطب
يعنى ياخوانى
بعد م اقوم بتسطيب الملف التنفيذى لبرنامجى يقوم يبحث عن ملف تكست وليكن اسمه con داخل فولدر اسمه mat3am حيث يفتح ملف التكست ويأخذ الكونكش الجديد بحسب جهاز العميل
هذا مديول وبه نص الاتصال
كود :
Imports System.IO
Imports System.Data.SqlClient
Module Connection
Dim st As String
Public con As SqlConnection = Nothing
Public cmd, cmd1, cmd2 As SqlCommand
Public rdr As SqlDataReader = Nothing
Public ds As DataSet
Public adp As SqlDataAdapter
Public dtable As DataTable
Public Function ReadCS() As String
Using sr As StreamReader = New StreamReader(Application.StartupPath & "\SQLSettings.dat")
st = sr.ReadLine()
End Using
Return st
End Function
Public ReadOnly cs As String = ReadCS()
11-12-22, 02:49 AM (آخر تعديل لهذه المشاركة : 11-12-22, 03:20 AM {2} بواسطة أبو خالد الشكري.)
(10-12-22, 08:45 PM)حماده ممدوح البحيرى كتب : السلام عليكم
كود :
Public ConStr As String = "Data Source= HAMADA-PC\SQLEXPRESS;Initial Catalog = Mat3amo;integrated security=true"
Public Con As New SqlClient.SqlConnection(ConStr)
كيف يمكن الاعتماد على هذا الكونكشن من خلال ملف تكست خارجى موجود باسم معين داخل ملف السيطب
يعنى ياخوانى
بعد م اقوم بتسطيب الملف التنفيذى لبرنامجى يقوم يبحث عن ملف تكست وليكن اسمه con داخل فولدر اسمه mat3am حيث يفتح ملف التكست ويأخذ الكونكش الجديد بحسب جهاز العميل
وعليكم السلام ورحمة الله وبركاته
أرجو تجربة المثال المرفق ! حيث أني وضعت الكود في موديول
ثم وضعت الكونكشن في ملف تكست اسمه LocalCon وملف التكست داخل فولدر اسمه mat3am وسوف تجده في مجلد البرتامج وهذا هو مسار ملف التكست C:\MyNewComputer\MyNewComputer\bin\Debug\mat3am
ويمكنك في أي وقت تغيير الكونكشن من خلال ملف التكست الخارجي الذي في فولدر mat3am
11-12-22, 06:19 AM (آخر تعديل لهذه المشاركة : 11-12-22, 06:21 AM {2} بواسطة حماده ممدوح البحيرى.)
(11-12-22, 02:49 AM)أبو خالد الشكري كتب :
(10-12-22, 08:45 PM)حماده ممدوح البحيرى كتب : السلام عليكم
كود :
Public ConStr As String = "Data Source= HAMADA-PC\SQLEXPRESS;Initial Catalog = Mat3amo;integrated security=true"
Public Con As New SqlClient.SqlConnection(ConStr)
كيف يمكن الاعتماد على هذا الكونكشن من خلال ملف تكست خارجى موجود باسم معين داخل ملف السيطب
يعنى ياخوانى
بعد م اقوم بتسطيب الملف التنفيذى لبرنامجى يقوم يبحث عن ملف تكست وليكن اسمه con داخل فولدر اسمه mat3am حيث يفتح ملف التكست ويأخذ الكونكش الجديد بحسب جهاز العميل
وعليكم السلام ورحمة الله وبركاته
أرجو تجربة المثال المرفق ! حيث أني وضعت الكود في موديول
ثم وضعت الكونكشن في ملف تكست اسمه LocalCon وملف التكست داخل فولدر اسمه mat3am وسوف تجده في مجلد البرتامج وهذا هو مسار ملف التكست C:\MyNewComputer\MyNewComputer\bin\Debug\mat3am
ويمكنك في أي وقت تغيير الكونكشن من خلال ملف التكست الخارجي الذي في فولدر mat3am
وأخبرني بالنتيجة !
نجحت معى بالفعل اخى الكريم الف شكر وكل التقدير لشخصك الكريم
(10-12-22, 10:23 PM)العتيق كتب : السلام عليكم و رحمة الله وبركاته
هذا المثال يفيدك اكثر من استخدام الاتصال بواسطة ملف خارجي
ارجو ان تستفيد منه
(10-12-22, 08:45 PM)حماده ممدوح البحيرى كتب : السلام عليكم
كود :
Public ConStr As String = "Data Source= HAMADA-PC\SQLEXPRESS;Initial Catalog = Mat3amo;integrated security=true"
Public Con As New SqlClient.SqlConnection(ConStr)
كيف يمكن الاعتماد على هذا الكونكشن من خلال ملف تكست خارجى موجود باسم معين داخل ملف السيطب
يعنى ياخوانى
بعد م اقوم بتسطيب الملف التنفيذى لبرنامجى يقوم يبحث عن ملف تكست وليكن اسمه con داخل فولدر اسمه mat3am حيث يفتح ملف التكست ويأخذ الكونكش الجديد بحسب جهاز العميل
اولا: تاكد انك عامل تعريف الاتصال DBConn واحد فقط لكامل المشروع
ثانيا: ضع داخل ملف التكست con.txt نص التالي كما هو
كود :
Data Source= HAMADA-PC\SQLEXPRESS;Initial Catalog = Mat3amo;integrated security=true
وهذا الكود بعد التعديل
كود :
Public ConStr As String = IO.File.ReadAllText(Application.StartupPath & "\mat3am\con.txt")
Public DBConn As New SqlConnection(ConStr)
لاحظ ان Application.StartupPath تعني مسار ملف تشغيل البرنامج ثم مجلد اسمه mat3am حسب قولك ثم داخله ملف con.txt
اذا حصل خطأ حدد السطر البرمجي مع ارفاق الملف النصي con.txt اللي عتدك
ولو تعمل مشروع بسيط من عندك وتطبق الفكرة عليه وترفقه يكون أفضل ليستطيع الاعضاء تعديله وارساله لك
