تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
سحب و افلات و استخراج المعلومات
#1
السلام عليكم

ابغي اسوي برنامج اذا سحبت إليه الي في الصورة


يستخرج رابط الموقع و الأسم


يعني اذا سحبت الي في الصورة الأوله و افلته في المربع الأبيض الكبير في البرنامج يستخرج رابط الموقع و يضعه في خانة رابط الموقع و يستخرج اسم الموقع و يضعه في خانة اسم الموقع

ضروري
و اكون شاكر لكم
الرد
تم الشكر بواسطة:
#2
اتمنى انكم فهمتوني
الرد
تم الشكر بواسطة:
#3
يا شباب
اذا ما عرفتون على الأقل اذا تعرفون :
شورت كيت لموقع على سطح الموقع و ابغي اذا ضغط زر يوضع رابط الموقع في تكست بوكس
الرد
تم الشكر بواسطة:
#4
ويش هذا الملف الي في الصورة ؟ صفحة html ؟
الرد
تم الشكر بواسطة:
#5
(15-03-14, 10:55 PM)الشاكي لله كتب : ويش هذا الملف الي في الصورة ؟ صفحة html ؟

اي اذا تضغطه ينقلك لموقع
الرد
تم الشكر بواسطة:
#6
الرد
تم الشكر بواسطة:
#7
اها شورت كات

اصبر بسوي لك مشروغ
الرد
تم الشكر بواسطة:
#8
تم بعون الله





الكود للافادة (مشروح بالتعليقات الخضراء) :-

مكتوب بالسي شارب تقدر تحوله من هنا


PHP كود :
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;
using System.IO;

namespace 
DragDropShortcut
{
    public 
partial class MainForm Form
    
{
        public 
MainForm()
        {
            
InitializeComponent();
        }

        private 
void itemsListView_DragEnter(object senderDragEventArgs e)
        {
            if (
e.Data.GetDataPresent(DataFormats.FileDrop))
            {
                
e.Effect DragDropEffects.Copy//تحديد شكل الماوس عند عملية الافلات
            
}
        }

        private 
void itemsListView_DragDrop(object senderDragEventArgs e)
        {
            
string[] files = (string[])e.Data.GetData(DataFormats.FileDrop); //جلب الداتا من عملية الافلات

            
foreach (string file in files)
            {
                if (
Path.GetExtension(file).ToLower() == ".url")   //اذا كان الملف الملقى فقط على صيغة url
                
{
                    
ListViewItemX item = new ListViewItemX();
                    
item.Text Path.GetFileNameWithoutExtension(file); //جلب الاسم
                    
item.URL GetShortcutURL(file); //جلب الرابط
                    
item.ImageIndex 0;

                    
itemsListView.Items.Add(item);  //الاضافة الى اللست فيو
                
}
            }
        }


        private 
void itemsListView_SelectedIndexChanged(object senderEventArgs e)
        {
            if (
itemsListView.SelectedItems.Count != 0)
            {
                
ListViewItemX currentItem = (ListViewItemX)itemsListView.SelectedItems[0]; //جلب المحدد حاليا في اللستة

                
nameTextBox.Text currentItem.Text;
                
urlTextBox.Text currentItem.URL;
            }
        }

        private 
void goButton_Click(object senderEventArgs e)
        {
            try
            {
                
System.Diagnostics.Process.Start(urlTextBox.Text);
            }
            catch (
Exception ex) { MessageBox.Show(ex.Message"Error"MessageBoxButtons.OKMessageBoxIcon.Error); }
        }


        private 
void itemsListView_KeyDown(object senderKeyEventArgs e)
        {
            if (
e.KeyCode == Keys.Delete && itemsListView.SelectedItems.Count != 0)
            {
                
itemsListView.Items.Remove(itemsListView.SelectedItems[0]); //حذف الاختصار اذا ضغط delete
                
nameTextBox.Text string.Empty; //تصفير التسكت بوكسات
                
urlTextBox.Text string.Empty;
            }
        }


        
#region "GetShortcutURL"

        
string GetShortcutURL(string file)
        {

            
string[] content File.ReadAllLines(file);

            
//قرائة النص
            
foreach (string line in content)
            {
                
//البحث عن URL=
                
if (line.StartsWith("URL="))
                {
                    
//جلب الرابط بدون URL=
                    
return line.Remove(04);
                }
            }

            return 
"";
        }

        
#endregion


        

    
}

    class 
ListViewItemX ListViewItem   //عمل لست ايتيم معدل فيه خاصية url
    
{
        public 
string URL getset; }
    }





المشروع في المرفقات


ملاحظة : ملفات الshortcut الي اقصدها هي التي تنتهي ب Url.



الملفات المرفقة
.zip   DragDropShortcut.zip (الحجم : 102.52 ك ب / التحميلات : 93)
الرد
تم الشكر بواسطة: kslawy , mohssan
#9
(16-03-14, 12:36 AM)الشاكي لله كتب :
تم بعون الله





الكود للافادة (مشروح بالتعليقات الخضراء) :-

مكتوب بالسي شارب تقدر تحوله من هنا


PHP كود :
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;
using System.IO;

namespace 
DragDropShortcut
{
    public 
partial class MainForm Form
    
{
        public 
MainForm()
        {
            
InitializeComponent();
        }

        private 
void itemsListView_DragEnter(object senderDragEventArgs e)
        {
            if (
e.Data.GetDataPresent(DataFormats.FileDrop))
            {
                
e.Effect DragDropEffects.Copy//تحديد شكل الماوس عند عملية الافلات
            
}
        }

        private 
void itemsListView_DragDrop(object senderDragEventArgs e)
        {
            
string[] files = (string[])e.Data.GetData(DataFormats.FileDrop); //جلب الداتا من عملية الافلات

            
foreach (string file in files)
            {
                if (
Path.GetExtension(file).ToLower() == ".url")   //اذا كان الملف الملقى فقط على صيغة url
                
{
                    
ListViewItemX item = new ListViewItemX();
                    
item.Text Path.GetFileNameWithoutExtension(file); //جلب الاسم
                    
item.URL GetShortcutURL(file); //جلب الرابط
                    
item.ImageIndex 0;

                    
itemsListView.Items.Add(item);  //الاضافة الى اللست فيو
                
}
            }
        }


        private 
void itemsListView_SelectedIndexChanged(object senderEventArgs e)
        {
            if (
itemsListView.SelectedItems.Count != 0)
            {
                
ListViewItemX currentItem = (ListViewItemX)itemsListView.SelectedItems[0]; //جلب المحدد حاليا في اللستة

                
nameTextBox.Text currentItem.Text;
                
urlTextBox.Text currentItem.URL;
            }
        }

        private 
void goButton_Click(object senderEventArgs e)
        {
            try
            {
                
System.Diagnostics.Process.Start(urlTextBox.Text);
            }
            catch (
Exception ex) { MessageBox.Show(ex.Message"Error"MessageBoxButtons.OKMessageBoxIcon.Error); }
        }


        private 
void itemsListView_KeyDown(object senderKeyEventArgs e)
        {
            if (
e.KeyCode == Keys.Delete && itemsListView.SelectedItems.Count != 0)
            {
                
itemsListView.Items.Remove(itemsListView.SelectedItems[0]); //حذف الاختصار اذا ضغط delete
                
nameTextBox.Text string.Empty; //تصفير التسكت بوكسات
                
urlTextBox.Text string.Empty;
            }
        }


        
#region "GetShortcutURL"

        
string GetShortcutURL(string file)
        {

            
string[] content File.ReadAllLines(file);

            
//قرائة النص
            
foreach (string line in content)
            {
                
//البحث عن URL=
                
if (line.StartsWith("URL="))
                {
                    
//جلب الرابط بدون URL=
                    
return line.Remove(04);
                }
            }

            return 
"";
        }

        
#endregion


        

    
}

    class 
ListViewItemX ListViewItem   //عمل لست ايتيم معدل فيه خاصية url
    
{
        public 
string URL getset; }
    }





المشروع في المرفقات


ملاحظة : ملفات الshortcut الي اقصدها هي التي تنتهي ب Url.


مشكوووووووووووووووووووووووووووووووور
هاذا الي ابغيه و اكثر و احسن
مشكور مشكور
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  استخراج رقم من صفحة dasktop 1 65 18-11-18, 12:45 AM
آخر رد: trakktour
  [VB.NET] مشكلة في استخراج روابط هذه الصفحة بال HtmlAgilityPack mervandzz 2 130 13-10-18, 03:53 PM
آخر رد: mervandzz
  [VB.NET] استخراج regex mervandzz 2 182 08-10-18, 04:20 PM
آخر رد: عبدالله الدوسري
  [VB.NET] استخراج نسسبة الارباح حسب اسم المندوب فراس الغزي 16 553 12-09-18, 08:47 PM
آخر رد: elgokr
Question [VB.NET] طريقة نقل المعلومات من DataGridView1 إلى DataGridView2 والحفظ dell 14 577 27-07-18, 01:36 AM
آخر رد: dell
Star استخراج جميع الروابط ذات صلة من المواقع YousefOkasha 0 260 20-07-18, 03:35 AM
آخر رد: YousefOkasha
  استخراج عدد السنين من مجموع عدد الاشهر aftfm 19 564 29-06-18, 07:13 PM
آخر رد: elgokr
  [سؤال] حماية ملف الdll من استخراج الاكواد mohamed haroon 8 1,314 25-06-18, 12:52 PM
آخر رد: YousefOkasha
  [سؤال] OCR استخراج الكتابة من الصور mohamed haroon 5 926 20-06-18, 02:18 AM
آخر رد: YousefOkasha
  استخراج الملفات من ال Resources YousefOkasha 3 204 27-05-18, 01:03 AM
آخر رد: elgokr

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


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