منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : أين الخطأ في هذا الكود ..
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2 3 4
يا الغالي مو انا اللي كتبت الكود .. هذا برنامج جاهز موجود عندنا ..
مطلوب مني اعدل فيه تعديلات .. وهو مو راضي يشتغل على جهازي تحديدا ..
ابغى اشغله واسوي التعديلات .. المشكلة ليست من الكود لأن الكود نفسه شغال في اجهزة أخرى ..
أبغى اشغله واسوي التعديلات بالطريقة البدائية اللي اعرفها لين ما أجيد طريقة الكلاسات ..

ملاحظة ..
الأجهزة الأخرى فيها sql server 2008 وجهازي 2012 هل من هنا المشكلة ؟؟
فعلا اخي الكريم انت ذكرت هذا في البداية لكني لم اهتم له والان وبعد كل ماحدث اقول كيف نسخت القاعدة لجهازك؟

انظر لهذا الموقع
http://www.connectionstrings.com/sql-server/
قاعدة البيانات مرفقة مع ملف البرنامج .. عند تشغيل البرنامج تنسخ نفسها إلى SQL server ..
-
أخي ما راح يكلفك شئ .. ملف مضغوط ارسله لك وشغله زي ما هو وشوف المشكلة  Smile
اخي الكريم لو كان مربوط باكسس ساقول نعم ارسله واعدل عليه لكنه sql server ربما يعمل لدي لكن لايعمل عندك فالافضل ان تجد الحل بنفسك ونحن نساعدك.
انت قلت  
إقتباس :عند تشغيل البرنامج تنسخ نفسها إلى SQL server
هذه النقطة ليست واضحة؟ هل تقصد نسخ بطريقة نسخ الملفات؟ يعني File.copy ؟
ام تقصد تثبيت ملف القاعدة الى sql server؟
أولا أشكرك حبيبي على سعة صدرك .. وتعبتك معي ربنا يجزيك ألف خير ..

كود :
   Public Property conn() As SqlConnection
       Get
           Dim str = ConfigurationManager.AppSettings("WedHallsConn")
           str = str.Insert(str.IndexOf("WedHalls.mdf"), Application.StartupPath + "\")
           _conn = New SqlConnection(str)
           _conn.Open()
           Return _conn
       End Get
       Set(ByVal value As SqlConnection)
           _conn = value
       End Set
   End Property

اعتقد هذا كود إرفاق الداتا بيز ..
وهي فرصة كمان ابغى مرجع اتعلم منه إرفاق الداتا بيز sql server بحيث انها تشتغل مع setup البرنامج بدون ما أحتاج انقلها لحالها ..
اخي الكريم الكود الذي كتبت هو للاتصال بملف القاعدة بناء على جملة الاتصال المخزنة في ملف التكوين App
ومتغير جملة الاتصال كما هو مكتوب باسم WedHallsConn فاريد ان تكتب جملة الاتصال مع تعديل بالبيانات الحساسة.
كود :
<?xml version="1.0"?>
<configuration>
   <configSections>
       <sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
           <section name="WedHalls.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
       </sectionGroup>
   </configSections>
   <connectionStrings>
       <add name="WedHalls.My.MySettings.WedHallsConnectionString" connectionString="Data Source=.\SQLEXPRESS;AttachDbFilename=C:\Users\aw\Desktop\WedHallss\WedHalls\WedHalls\WedHalls.mdf;Integrated Security=True;Connect Timeout=30;User Instance=False"
           providerName="System.Data.SqlClient" />
       <add name="WedHalls.My.MySettings.Database2ConnectionString"
           connectionString="Data Source=|DataDirectory|\Database2.sdf"
           providerName="Microsoft.SqlServerCe.Client.4.0" />
   </connectionStrings>
   <system.diagnostics>
       <sources>
           <!-- This section defines the logging configuration for My.Application.Log -->
           <source name="DefaultSource" switchName="DefaultSwitch">
               <listeners>
                   <add name="FileLog"/>
                   <!-- Uncomment the below section to write to the Application Event Log -->
                   <!--<add name="EventLog"/>-->
               </listeners>
           </source>
       </sources>
       <switches>
           <add name="DefaultSwitch" value="Information"/>
       </switches>
       <sharedListeners>
           <add name="FileLog" type="Microsoft.VisualBasic.Logging.FileLogTraceListener, Microsoft.VisualBasic, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL" initializeData="FileLogWriter"/>
           <!-- Uncomment the below section and replace APPLICATION_NAME with the name of your application to write to the Application Event Log -->
           <!--<add name="EventLog" type="System.Diagnostics.EventLogTraceListener" initializeData="APPLICATION_NAME"/> -->
       </sharedListeners>
   </system.diagnostics>
 <appSettings>
   <add key="WedHallsConn" value="Data Source=.\SQLEXPRESS;AttachDbFilename=C:\Users\aw\Desktop\WedHallss\WedHalls\WedHalls\WedHalls.mdf;Integrated Security=True;Connect Timeout=30;User Instance=False"/>
   <add key="LogFileName" value="WedHalls.txt"/>
   <add key="LogPath" value="C:\cLogs\WedHalls\"/>

 </appSettings>
<startup><supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.0"/></startup><userSettings>
   <WedHalls.My.MySettings>
     <setting name="day" serializeAs="String">
       <value />
     </setting>
     <setting name="month" serializeAs="String">
       <value />
     </setting>
     <setting name="year" serializeAs="String">
       <value />
     </setting>
     <setting name="checked" serializeAs="String">
       <value>False</value>
     </setting>
   </WedHalls.My.MySettings>
 </userSettings>
</configuration>

ملف app  Smile
الصراحة اني تفاجات من طريقة التعامل مع جملة الاتصال؟
واقصد صياغة الجملة فقد وجدت سطرين لجملة الاتصال ونحن بحاجة لواحد.

كود :
<add name="WedHalls.My.MySettings.WedHallsConnectionString" connectionString="Data Source=.\SQLEXPRESS;AttachDbFilename=C:\Users\aw\Desktop\WedHallss\WedHalls\WedH​alls\WedHalls.mdf;Integrated Security=True;Connect Timeout=30;User Instance=False"
           providerName="System.Data.SqlClient" />
وكما ترى مسار ملف القاعدة يمر باسم الجهاز وهذا قد يسبب خطا

والسطر الثاني:
كود :
<add name="WedHalls.My.MySettings.Database2ConnectionString"
           connectionString="Data Source=|DataDirectory|\Database2.sdf"
           providerName="Microsoft.SqlServerCe.Client.4.0" />
وهذا المسار هو للملف المجاور للبرنامج.
لاحظ اختلاف اسم ملف القاعدة بين السطرين وقد يكون هو السبب!!!
طيب إيش التعديل ؟؟
وقفة!
شوف اخي الكريم.
هل القاعدة هذه تحتوي بيانات؟ ام فقط جداول واعمدة؟
اذا فقط جداول واعمدة بلا بيانات فيمكنك انشاء القاعدة بالكود وزراعة كافة الجداول المطلوبة



هذا مثال على ذلك.

اما لو الامر يتطلب نشر ملف القاعدة فاخبرني لكي اكمل
الصفحات : 1 2 3 4