تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] عايز اشغل الكود ده على ال #c
#2
السلام عليكم و رحمة الله و بركاته

مجرد تحويل ولا ادري هل يعمل ام لا, جربه على المشروع لديك و اي خطأ اطرحه هنا 

PHP كود :
public void LoadCategory()
{
 
   try {
 
       sqlstr "Select Id,VideoCategory From tblCategory";
 
       da = new OleDbDataAdapter(sqlstrcon);
 
       ds = new DataSet();
 
       
        ds
.Clear();
 
       da.Fill(ds"tblCategory");
 
     
        ComboBox1
.Items.Clear();
 
       ComboBox1.DataSource ds.Tables("tblCategory");
 
       ComboBox1.ValueMember "id";
 
       ComboBox1.DisplayMember "VideoCategory";
 
   } catch (Exception ex) {
 
       if (ex.Message.ToString.ToLower.Contains("cannot open database it may not be a database that your application recognizes")) {
 
           Interaction.MsgBox("حدثت مشكلة فى البرنامج و جارى تحميل ملف حل المشكلة الرجاء تيطيبة بعد اكتمال التحميل و عدم غلق البرنامج الا مع اكتمال التحميل"MsgBoxStyle.Information MsgBoxStyle.OkOnly"خطأ");
 
           My.Computer.Network.DownloadFile("https://download.microsoft.com/download/2/4/3/24375141-E08D-4803-AB0E-10F2E3A07AAA/AccessDatabaseEngine.exe"Application.StartupPath "\\AccessDatabaseEngine.exe");
 
           //كدة هيحمل الملف اللى هيصلح الرسالة التانية جنب البرنامج
 
           IO.File.Open(Application.StartupPath "\\AccessDatabaseEngine.exe"IO.FileMode.Open);
 
       } else if (ex.Message.ToString.ToLower.Contains("the microsoft.ace.oledb.12.0 provider is not registered on the local machine")) {
 
           Interaction.MsgBox("حدثت مشكلة فى البرنامج و جارى تحميل ملف حل المشكلة الرجاء تيطيبة بعد اكتمال التحميل و عدم غلق البرنامج الا مع اكتمال التحميل"MsgBoxStyle.Information MsgBoxStyle.OkOnly"خطأ");
 
           My.Computer.Network.DownloadFile("https://download.microsoft.com/download/2/4/3/24375141-E08D-4803-AB0E-10F2E3A07AAA/AccessDatabaseEngine.exe"Application.StartupPath "\\AccessDatabaseEngine.exe");
 
           IO.File.Open(Application.StartupPath "\\AccessDatabaseEngine.exe"IO.FileMode.Open);

 
       }

 
   }
}

public 
void LoadVideoName(int Value)
{

 
   try {
 
       sqlstr "Select Id,VideoName From tblVideo Where CategoryId = @CategoryId";
 
       da = new OleDbDataAdapter(sqlstrcon);
 
      
        da
.SelectCommand.Parameters.Add(new OleDbParameter("@CategoryId"Value));
 
      
        if 
(ds.Tables.Contains("tblVideo")) {
 
           ds.Tables("tblVideo").Clear();
 
       }
 
    
        da
.Fill(ds"tblVideo");
 
    
        ComboBox2
.DataSource ds.Tables("tblVideo");
 
       ComboBox2.ValueMember "id";
 
       ComboBox2.DisplayMember "VideoName";
 
   } catch (Exception ex) {
 
       Interaction.MsgBox(ex.Message);
 
   }
}
public 
void LoadSubVideo(int Value)
{
 
   try {
 
       sqlstr "Select Id,SubVideo,LinkVideo From tblSubVideo Where VideoId = @VideoId";
 
       da = new OleDbDataAdapter(sqlstrcon);
 
       da.SelectCommand.Parameters.Add(new OleDbParameter("@VideoId"Value));
 
      
        if 
(ds.Tables.Contains("tblSubVideo")) {
 
           ds.Tables("tblSubVideo").Clear();
 
       }
 
      
        da
.Fill(ds"tblSubVideo");
 
      
        ListBox1
.DataSource ds.Tables("tblSubVideo");
 
       ListBox1.ValueMember "LinkVideo";
 
       ListBox1.DisplayMember "SubVideo";

 
   } catch (Exception ex) {
 
       Interaction.MsgBox(ex.Message);
 
   }

اللهم لك الحمد كما ينبغي لجلال وجهك و عظيم سلطانك
في حل و ترحال
الرد }}}
تم الشكر بواسطة: Amir_Alzubidy , Amir_Alzubidy


الردود في هذا الموضوع
RE: عايز اشغل الكود ده على ال #c - بواسطة ابو ليلى - 30-04-17, 09:18 PM

المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Information ما هو الخطاء في الكود ProgressBar1 Mostafa201255411 1 197 26-11-25, 08:19 PM
آخر رد: asmarsou
  [VB.NET] مساعدة تعديل على الكود ZEEN4ZEEN 2 218 08-10-25, 02:20 PM
آخر رد: salamandal
Rainbow [كود] تصحيح الخطاء في الكود محمد مسافر 2 1,053 28-08-25, 09:13 AM
آخر رد: محمد مسافر
Rainbow [كود] تصحيح الخطاء في الكود محمد مسافر 0 847 27-08-25, 04:05 PM
آخر رد: محمد مسافر
  ما هو الخطأ فى هذا الكود خالد كامل1 10 1,187 28-05-25, 09:16 PM
آخر رد: خالد كامل1
  ارجو تعديل الكود بواستطة الاجراء المخزن new_programer 3 679 03-04-25, 02:44 PM
آخر رد: princelovelorn
  مساعدة في تحويل الكود من فيجوال بسيك 6 الى فيجوال دوت نت سيد أحمد 5 823 23-03-25, 10:54 PM
آخر رد: سيد أحمد
  ارجو تعديل الكود جلب البيانات عن طريق اجراء مخزن - مرفق مثال new_programer 0 624 05-02-25, 01:51 AM
آخر رد: new_programer
  ارجو تقيم الكود المرفق - جلب اعلي رقم لتسلسل نصي للباركود new_programer 4 604 30-01-25, 08:26 AM
آخر رد: new_programer
  هذا الكود لا يعمل بشكل صحيح لماذا ؟ PeterGhattas082460 3 450 21-12-24, 02:55 PM
آخر رد: aljzazy

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


يقوم بقرائة الموضوع: