(18-02-19, 02:45 AM)ابراهيم ايبو كتب :السلام عليكم اخي الكريم ابو روضةاذا كان فقط الرقم بدون الرمز (&id) الذي يتغير دائما فإليك هذا الكودكود :
Dim xx As String = "https://www.facebook.com/permalink.php?story_fbid=2458694440868208&id=100001830278541"
Dim ff() = xx.Split("=")
TextBox1.Text = ff(1).ToString.Substring(0, ff(1).ToString().Length - 3)
عليكم السلام ورحمة الله وبركاته...
ماشاء الله عليك أخى ابراهيم فعلا نجح مائة بالمائة...
لو وقف معايا ابقى لو تكرمت تابع الموضوع لو وقتك يسمح
لكن هو الى الان تمام وجزاك الله كل الخير
ولو تسمح ممكن شرح مبسط للكود ببعد اذنك عشان افهم بس

