[XBOOBX]

السلام عليكم 

اريد طريقة سحب التوكين من الرابط 

https://frog.wix.com/hls2?_=153963303513...=&evid=110

المراد سحبة هذا

88b438cb-8abc-6eda-a629-ab0b10351215

امام كلمة 

ldSessionID

عن طريق الريجكس

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

كود :

Dim str As Match = Regex.Match(httpRequest.Get("https://users.wix.com/", Nothing).ToString, "")
                       httpRequest.AddParam("ldSessionID", str.Groups.Item(1).ToString)

وشكرا

---

كود :

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Dim regx As New Regex("", RegexOptions.IgnoreCase)
       Dim matches As MatchCollection = regx.Matches(RichTextBox1.Text)
       For Each match As Match In matches
           Dim j As String() = Split(match.Value, "(.*?)", CompareMethod.Binary)
       Next
   End Sub

حتى لو كانت بهاذي الطريقة المهم الرابط اسخرج منة التوكين

up

[حريف برمجة]

وعليكم السلام ورحمة الله وبركاته

طلبك غير واضح اخي !

هل هو تطبيق ويندوز فورم او ويب سايت ؟

ايضاً الرابط اين يوجد ؟ وكيف تأتي به ؟

---

على العموم لنفرض ان الرابط موجود في تكست بوكس 1 ،،
وتريد جلب التوكن من الرابط ووضعه في تكست بوكس 2 ،،

الكود كالتالي :

كود :

Dim UrlToken As String = TextBox1.Text

       If UrlToken.IndexOf("ldSessionID=") = -1 Then
           TextBox2.Text = "No token found"
       Else
           Dim CurrentToken = Mid(UrlToken, UrlToken.IndexOf("ldSessionID=") + 13, Len(UrlToken) - UrlToken.IndexOf("ldSessionID=")).ToString.Split("&")
           TextBox2.Text = CurrentToken(0)
       End If

[XBOOBX]

(16-10-18, 06:29 AM)حريف برمجة كتب : وعليكم السلام ورحمة الله وبركاته

طلبك غير واضح اخي !

هل هو تطبيق ويندوز فورم او ويب سايت ؟

ايضاً الرابط اين يوجد ؟ وكيف تأتي به ؟

---

على العموم لنفرض ان الرابط موجود في تكست بوكس 1 ،،
وتريد جلب التوكن من الرابط ووضعه في تكست بوكس 2 ،،

الكود كالتالي :

كود :

Dim UrlToken As String = TextBox1.Text

       If UrlToken.IndexOf("ldSessionID=") = -1 Then
           TextBox2.Text = "No token found"
       Else
           Dim CurrentToken = Mid(UrlToken, UrlToken.IndexOf("ldSessionID=") + 13, Len(UrlToken) - UrlToken.IndexOf("ldSessionID=")).ToString.Split("&")
           TextBox2.Text = CurrentToken(0)
       End If

اشكرك اخي على الرد والمساعدة 

الرابط موجود دخل الصفحة في زر استعادة كلمة المرور

سورس الزر 

PHP كود :

<a class="forgot-password-link ng-binding" ng-href="/account-recovery?sessionId=9ff2d555-774d-2a23-3c57-5837e42439d3" target="_self" href="/account-recovery?sessionId=9ff2d555-774d-2a23-3c57-5837e42439d3">Forgot Password?</a> 


ولاكن عندما استعمل طريقتك تنقص حرفين 
9f

وهذا رابط الصفحة الذي يوجد فية توكين
https://users.wix.com/account-recovery?s...37e42439d3

وهنا تسجيل الدخول عند التسجيل يطلب التحقق 
من 

9ff2d555-774d-2a23-3c57-5837e42439d3

وهذا رابط تسجيل الدخول

https://users.wix.com/signin

وهاذي صورة للتوضيح اكثر

وشكرا
في انتظار الحل

[حريف برمجة]

غير +13 لتصبح +11 في الكود تبعي ،، وراح تضبط الامور .

[XBOOBX]

(16-10-18, 10:41 PM)حريف برمجة كتب : غير +13 لتصبح +11 في الكود تبعي ،، وراح تضبط الامور .

اشكرك اخي واسف لتعبك معي 

ولاكن التوكين متغير وعند وضعة بهاذي الطريقة لا يسحب التوكين

اريد طريقة الحصول علية من داخل  

Forgot Password?

عند تسجيل الدخول

[حريف برمجة]

مشروعك ويندوز فورم او ويب سايت ؟

ماهي اللغة او المنصة اللي تستخدمها ؟

هل هذا الرابط فقط او ممكن تكون هناك عدة روابط مختلفة ؟

هل التوكن بعد هذا

كود :

?sessionId=

،، او ممكن تكون مختلفة ؟

اجب على الأسئلة وستجد الإجابة بإذن الله .

[XBOOBX]

(17-10-18, 04:26 AM)حريف برمجة كتب : مشروعك ويندوز فورم او ويب سايت ؟

ماهي اللغة او المنصة اللي تستخدمها ؟

هل هذا الرابط فقط او ممكن تكون هناك عدة روابط مختلفة ؟

هل التوكن بعد هذا

كود :

?sessionId=

،، او ممكن تكون مختلفة ؟

اجب على الأسئلة وستجد الإجابة بإذن الله .

اشكرك اخي واسف على تعبك معي 

طريقة العمل vb.net 

فيجوال ستديو 2012

PHP كود :

<a class="forgot-password-link ng-binding" ng-href="/account-recovery?sessionId=83fa184a-9368-c441-030d-599ea6561aad" target="_self" href="/account-recovery?sessionId=83fa184a-9368-c441-030d-599ea6561aad">Forgot Password?</a> 


نعم اخي الذي امامة هذا ويوجد اثنان اريد سحب واحد منهم ووضعة في المكان لكي يتم تسجيل الدخول  
 اريد طريقة استخراجة من كلمة 
Forgot Password?
 sessionId=   83fa184a-9368-c441-030d-599ea6561aad

وشكرا 

[حريف برمجة]

في حدث تحميل الصفحة اكتب السطر هذا :

كود :

TextBox1.Text = Request.QueryString("sessionId")

[XBOOBX]

(17-10-18, 04:28 PM)حريف برمجة كتب : في حدث تحميل الصفحة اكتب السطر هذا :

كود :

TextBox1.Text = Request.QueryString("sessionId")

اشكرك اخي واسف لتعبك معي ولاكن انت لم تفهم فصدي 

انا اريد تحويل هذا الى regex لكي يتم الحصل على  83fa184a-9368-c441-030d-599ea6561aad امام كلمة sessionId

<a class="forgot-password-link ng-binding" ng-href="/account-recovery?sessionId=83fa184a-9368-c441-030d-599ea6561aad" target="_self" href="/account-recovery?sessionId=83fa184a-9368-c441-030d-599ea6561aad">Forgot Password?</a> 

بهاذي الطريقة

لاكن عند وضع الكود الذي وضعتة انت لو كان بهاذي السهولة الرجكس لكنت عملتها من الاول 

ولاكن الريجكس يحتاج تحديد شيء من مجموعة كلمات كثيرة لكي يتم سحبهاهية فقط وسف اعطيك مثال 

على موقع لسحب التوكين الموجود داخل سورس الصفحة

فالندخل الى موقع نيت فلاكس فية توكين للتحقق من التسجيل

المثال

كود :

Dim match As Match = Regex.Match(Request.Get("https://www.netflix.com/login", Nothing).ToString, "<input type=""hidden"" name=""authURL"" value=""(.*?)"" data-reactid")
           MsgBox(match.Groups.Item(1).Value.ToString)

هذا المثال يقوم بسحب قيمة الريجكس المطلوبة لتسجيل الدخول الى الموقع للتحقق وهية العلامة التي حددتها بهذا الشكل
(?*.)

كود :

Dim match As Match = Regex.Match(Request.Get("url", Nothing).ToString, "regex match ")

لكي يتم استدعاء التوكين الى هذا الخيار 

كود :

httpRequest.AddParam("ldSessionID", str.Groups.Item(1).ToString)

تم توضيح الطلب اخي