منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
تشغيل مشروع فيجوال بيسك6 - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : تشغيل مشروع فيجوال بيسك6 (/showthread.php?tid=25358)

الصفحات: 1 2 3

تشغيل مشروع فيجوال بيسك6 - حافظ حافظ - 13-06-18

السلام عليكم.اخواني لدي ملف exe فيجوال 6 اشغلو من اللرسورس بهذا الكود

كود :
   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Dim dir As String = My.Computer.FileSystem.SpecialDirectories.Temp
       Dim filename As String = dir + "Project1.exe"
       IO.File.WriteAllBytes(filename, My.Resources.Project1)
       Process.Start(filename)
   End Sub
قاعدة بيانات يلي تتبع هذا المشروع الفيجوال6 وضعتها بال debug .طيب لما اجيت اشغل يطلعلي خطـأ.كيف يمكن يكون كود مسار قاعدة البيانت داخل مشروع الفيجوال6 الله يرضى عليكو.هو مكتوب هيك

كود :
Private Sub Form_Load()
DB.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\DATACUSTOMER.mdb"
End Sub


RE: تشغيل مشرةع فيجوال بيسك6 - elgokr - 13-06-18

هنا قسم الـ .Net
وليس الاصدار الـ 6

يوجد قسم خاص به لطرح الاسئلة

تحياتى لك
وتمنياتى لك التوفيق


RE: تشغيل مشرةع فيجوال بيسك6 - حافظ حافظ - 13-06-18

شكرا لك لكن السؤال يخص بالدرجة 1 ال Net .. نصفو net و نصفو vb6 ولو رحت للvb6 بردو سيقولو هنا قسم vb6 روح لقسم ال net

RE: تشغيل مشرةع فيجوال بيسك6 - elgokr - 13-06-18

(13-06-18, 09:57 PM)حافظ حافظ كتب : شكرا لك لكن السؤال يخص بالدرجة 1 ال Net .. نصفو net و نصفو vb6 ولو رحت للvb6 بردو سيقولو هنا قسم vb6 روح لقسم ال net


يعتمد ذلك على ما تعمل انت عليه

هل انت تقوم بانشاء مشروع على اصدارات الـ .Net

على اى حال يمكنك بكل بساطة عمل التالى..
وضع قاعدة البيانات فى  Resources

من ثم عمل شرط التحقق بوجود ملف على مسار (كمثال)
PHP كود :
C:\DATACUSTOMER.mdb 


من خلال الكود التالى مع نسخ قاعدة البيانات
كود :
       If Not File.Exists("c:\1.txt") Then
           File.Copy(My.Resources.DATACUSTOMER, "C:\DATACUSTOMER.mdb", True)
       End If

وانت كل ما عليك ان تجعل كود الاتصال بقاعدة البيانات يتم على مسار C:\
بنائاً ما ستكتب المسار فى الكود

تحياتى لك
وتمنياتى لك التوفيق


RE: تشغيل مشرةع فيجوال بيسك6 - حافظ حافظ - 14-06-18

بارك الله فيك اخي algokr .انا كنت اقصد ان الملف exe التابع لل vb6 و يلي رايح اضعو بالرسورس له قاعدة بيانات .قاعدة البيانات تتبع ملف projet1 بتاع ال vb6 . ابني المشروع بال فيجوال net .كيف رايح يكون استعلام جلب قاعدة البيانات بمشروع ال vb6

RE: تشغيل مشرةع فيجوال بيسك6 - سعود - 14-06-18

إقتباس :كيف رايح يكون استعلام جلب قاعدة البيانات بمشروع ال vb6

اظن هو نفس المكتوب لا يتغير لكن استخرج  الكل البرنامج وملف الاكسس مع بعض لمجلد واحد.

RE: تشغيل مشرةع فيجوال بيسك6 - elgokr - 14-06-18

(14-06-18, 12:02 AM)حافظ حافظ كتب : بارك الله فيك اخي algokr .انا كنت اقصد ان الملف exe التابع لل vb6 و يلي رايح اضعو بالرسورس له قاعدة بيانات .قاعدة البيانات تتبع ملف projet1 بتاع ال vb6 . ابني المشروع بال فيجوال net .كيف رايح يكون استعلام جلب قاعدة البيانات بمشروع ال vb6


الان فهمتك اكنت اعتقد انك تبنى مشروعك بـ VB6 لذلك

فى التعليق الاول وده بسبب لم افهمك من البداية

قم باستخدام نفس اكواد الاتصال والاستعلام فقط استبدل
كود :
App.Path

بالتالى
كود :
Application.StartupPath

الاكواد التالية غالباً لا يوجد بها اختلاف لان القاعدة واحدة

واذا توقف معك اى اخطاء فى اسطر من الاكواد
قم بكتابة الكود الذى به خطاء ليتم معالجته ليعمل معك على .Net

تحياتى لك
وتمنياتى لك التوفيق


RE: تشغيل مشرةع فيجوال بيسك6 - سعود - 14-06-18

مشاركة لكم اقدم مثال بسيط  الملف التنفيذي اخذته من المشروع هنا إهداء للجميع - مثال أو برنامج أرشيف صور المستندات

RE: تشغيل مشروع فيجوال بيسك6 - حافظ حافظ - 14-06-18

السلام عليكم. و الله ما قصرتو اخي algokr و اخي سعود .يعطيكم الف عافية و جزاكم بخيراته . اخي سعود فكرنك عملتها و مشى الحال بارك الله فيك .بس لو كان ممكن وضع قاعدة البيانات في مجلد ال debug بدلا من الرسورس.لاني تلخبطت شوية و انا لي غلطان.من المفروض قاعدة البيانات تكون في ال debug من اجل التعامل معها بمشروع الفيجوال net بنفس الوقت .قاعدة البيانات لازم تكون بمجلد debug اما مشروع vb6 اسمو projet1 يكون بالرسورس او بالمكان يلي تراه مناسب
ارسلت ملف vbnet و vb6

RE: تشغيل مشروع فيجوال بيسك6 - سعود - 14-06-18

اخي "حافظ" هل تعني انك توصلت للحل؟
لان المثال يعمل!