منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

(06-03-23, 04:55 PM)Taha Okla كتب : [ -> ]إن كان هذا الكود يعمل لديك في مشروع السي شارب بدون مشاكل
أرفع المشروع وسنحاول أن نحوله لـ VB.Net بإذن الله

(07-03-23, 01:38 AM)asdfar1977 كتب : [ -> ]

(06-03-23, 04:55 PM)Taha Okla كتب : [ -> ]إن كان هذا الكود يعمل لديك في مشروع السي شارب بدون مشاكل
أرفع المشروع وسنحاول أن نحوله لـ VB.Net بإذن الله

حضرتك انا رافع الكود السى شارب وعايز احوله فيجوال دوت نت
ومش عارف ارفع المشروع لانه كبير جدا . يرجى المساعدة

(07-03-23, 02:33 AM)Taha Okla كتب : [ -> ]

(07-03-23, 01:38 AM)asdfar1977 كتب : [ -> ]

(06-03-23, 04:55 PM)Taha Okla كتب : [ -> ]إن كان هذا الكود يعمل لديك في مشروع السي شارب بدون مشاكل
أرفع المشروع وسنحاول أن نحوله لـ VB.Net بإذن الله

حضرتك انا رافع الكود السى شارب وعايز احوله فيجوال دوت نت
ومش عارف ارفع المشروع لانه كبير جدا . يرجى المساعدة

المطلوب مشروع صغير (مثال بسيط - نافذة وحيدة) فيه هذه الجزئية من الكود وليس المشروع كله
بشرط أن يكون المشروع يعمل بدون أخطاء ..

[attachment=28738 كتب :asdfar1977 pid='190837' dateline='1678411676'][attachment=28738]

(07-03-23, 02:33 AM)Taha Okla كتب : [ -> ]

(07-03-23, 01:38 AM)asdfar1977 كتب : [ -> ]

(06-03-23, 04:55 PM)Taha Okla كتب : [ -> ]إن كان هذا الكود يعمل لديك في مشروع السي شارب بدون مشاكل
أرفع المشروع وسنحاول أن نحوله لـ VB.Net بإذن الله

حضرتك انا رافع الكود السى شارب وعايز احوله فيجوال دوت نت
ومش عارف ارفع المشروع لانه كبير جدا . يرجى المساعدة

المطلوب مشروع صغير (مثال بسيط - نافذة وحيدة) فيه هذه الجزئية من الكود وليس المشروع كله
بشرط أن يكون المشروع يعمل بدون أخطاء ..

الف مليون شكر على اهتمامك - مرفق الفايل

(10-03-23, 05:27 AM)asdfar1977 كتب : [ -> ]

(07-03-23, 02:33 AM)Taha Okla كتب : [ -> ]

(07-03-23, 01:38 AM)asdfar1977 كتب : [ -> ]

(06-03-23, 04:55 PM)Taha Okla كتب : [ -> ]إن كان هذا الكود يعمل لديك في مشروع السي شارب بدون مشاكل
أرفع المشروع وسنحاول أن نحوله لـ VB.Net بإذن الله

حضرتك انا رافع الكود السى شارب وعايز احوله فيجوال دوت نت
ومش عارف ارفع المشروع لانه كبير جدا . يرجى المساعدة

المطلوب مشروع صغير (مثال بسيط - نافذة وحيدة) فيه هذه الجزئية من الكود وليس المشروع كله
بشرط أن يكون المشروع يعمل بدون أخطاء ..

الف مليون شكر على اهتمامك - مرفق الفايل

---

(10-03-23, 05:27 AM)asdfar1977 كتب : [ -> ]

(07-03-23, 02:33 AM)Taha Okla كتب : [ -> ]

(07-03-23, 01:38 AM)asdfar1977 كتب : [ -> ]

(06-03-23, 04:55 PM)Taha Okla كتب : [ -> ]إن كان هذا الكود يعمل لديك في مشروع السي شارب بدون مشاكل
أرفع المشروع وسنحاول أن نحوله لـ VB.Net بإذن الله

حضرتك انا رافع الكود السى شارب وعايز احوله فيجوال دوت نت
ومش عارف ارفع المشروع لانه كبير جدا . يرجى المساعدة

المطلوب مشروع صغير (مثال بسيط - نافذة وحيدة) فيه هذه الجزئية من الكود وليس المشروع كله
بشرط أن يكون المشروع يعمل بدون أخطاء ..

الف مليون شكر على اهتمامك - مرفق الفايل

(06-03-23, 02:15 PM)asdfar1977 كتب : [ -> ]

using Net.Pkcs11Interop.Common;
using Net.Pkcs11Interop.HighLevelAPI;
using Newtonsoft.Json.Linq;
using RestSharp;
 private string GetToken()
        {
            try
            {
                var client = new RestClient(config_class.tokenurl);
                var request = new RestRequest(Method.POST);
                request.AddHeader("cache-control", "no-cache");
                request.AddHeader("content-type", "");
                request.AddParameter();
                IRestResponse response = client.Execute(request);
                JObject jObject = JObject.Parse(response.Content);
                dynamic resp = jObject;
                String token = resp.access_token;
                return token;
            }
            catch (Exception ex)
            {
            }
            return "";
        }

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

وكانت النتيجة واحدة 

ثم اخذت الكود الذى تم تحويله الى لغة الفيجوال واستخدمته فى القاعدة الخاصة بى ولكن اعطى خطى فى كود dynamic كما يلى

Dim resp As Dynamic = jObject

            Dim token As String = resp.access_token

ولقد قمت باحضار تلك المكتبه ولم يتغير شى  Imports Dynamitey

يرجى الافادة للاهمية

(10-03-23, 02:37 PM)عضو جديد كتب : [ -> ]

(06-03-23, 02:15 PM)asdfar1977 كتب : [ -> ]

using Net.Pkcs11Interop.Common;
using Net.Pkcs11Interop.HighLevelAPI;
using Newtonsoft.Json.Linq;
using RestSharp;
 private string GetToken()
        {
            try
            {
                var client = new RestClient(config_class.tokenurl);
                var request = new RestRequest(Method.POST);
                request.AddHeader("cache-control", "no-cache");
                request.AddHeader("content-type", "");
                request.AddParameter();
                IRestResponse response = client.Execute(request);
                JObject jObject = JObject.Parse(response.Content);
                dynamic resp = jObject;
                String token = resp.access_token;
                return token;
            }
            catch (Exception ex)
            {
            }
            return "";
        }

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

وكانت النتيجة واحدة 

ثم اخذت الكود الذى تم تحويله الى لغة الفيجوال واستخدمته فى القاعدة الخاصة بى ولكن اعطى خطى فى كود dynamic كما يلى

Dim resp As Dynamic = jObject

            Dim token As String = resp.access_token

ولقد قمت باحضار تلك المكتبه ولم يتغير شى  Imports Dynamitey

يرجى الافادة للاهمية

Dim resp As Dynamic = jObject
Dim token As String = jObject.Item("access_token")