15-12-22, 03:00 AM
السلام عليكم
في مشكلة بتظهر في كود في البرنامج بتاعي مكنتش بتظهر وبحاول احدد مكان المشكلة مش عارف ياريت حد يعرف يساعدني
صورة للمشكلة
(15-12-22, 01:19 PM)Jounior_P كتب : [ -> ]عادة الأخطاء المتعلقة بمرجع الكائن هي أخطاء وقت التشغيل وليست أخطاء المترجم. تحدث هذه الأخطاء عادةً عندما تحاول الإشارة إلى متغير بيانات فارغ أو إذا كنت تحاول الإشارة إلى متغير لم تتم تهيئته بعد
وعلى اي حال يفضل ارفاق المثال لكي يتمكن الاخوة هنا من مساعدتك
(15-12-22, 07:52 PM)Meroo1809 كتب : [ -> ]جرب انقل سطر التعريف التالي(15-12-22, 01:19 PM)Jounior_P كتب : [ -> ]عادة الأخطاء المتعلقة بمرجع الكائن هي أخطاء وقت التشغيل وليست أخطاء المترجم. تحدث هذه الأخطاء عادةً عندما تحاول الإشارة إلى متغير بيانات فارغ أو إذا كنت تحاول الإشارة إلى متغير لم تتم تهيئته بعد
وعلى اي حال يفضل ارفاق المثال لكي يتمكن الاخوة هنا من مساعدتك
علي اي حال شكرا لك اخي بس البرنامج كان شغال عادي ببنفس الاكواد الممشكلة اللي بتظهر دي جديدة
الرسالة اللي بتظهر اهي
" the remote server returned an error (403) forbidden "
والمشكلة في البرنامج بتيجي من DownloadString
Dim ShowNew = check.DownloadString("https://pastebin.com/raw/bPc5Nec0")
(15-12-22, 09:02 PM)asmarsou كتب : [ -> ]جرب انقل سطر التعريف التالي
Dim check As New System.Net.WebClient
قبل السطر التالي
Dim ShowNew = check.DownloadString("https://pastebin.com/raw/bPc5Nec0")
(15-12-22, 09:58 PM)Meroo1809 كتب : [ -> ](15-12-22, 09:02 PM)asmarsou كتب : [ -> ]جرب انقل سطر التعريف التالي
Dim check As New System.Net.WebClient
قبل السطر التالي
Dim ShowNew = check.DownloadString("https://pastebin.com/raw/bPc5Nec0")
جربت و نفس المشكلة بتظهر
Imports System.Net
Imports System.IO
Imports System.Text
Public Class Form1
Dim tempCookies As New CookieContainer
Dim byteData As Byte()
Private postData As String
Private postReq As HttpWebRequest
Private postreqstream As Stream
Private postresponse As HttpWebResponse
Dim encoding As New System.Text.UTF8Encoding
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
postReq = DirectCast(WebRequest.Create("https://pastebin.com/raw/bPc5Nec0"), HttpWebRequest)
postReq.Method = "GET"
postReq.KeepAlive = True
postReq.ContentType = "application/x-www-form-urlencoded"
postReq.UserAgent = "Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/83.0.4103.61 Safari/537.36"
postresponse = DirectCast(postReq.GetResponse(), HttpWebResponse)
Dim postreqreader As New StreamReader(postresponse.GetResponseStream())
Dim thepage1 As String = postreqreader.ReadToEnd
Application.DoEvents()
End Sub
End Class(16-12-22, 01:21 AM)اليوم السابع كتب : [ -> ]Imports System.Netاشكرك اخي الكريم تم حل المشكلة لما ضفت الواردات دي.
Imports System.IO
Imports System.Text
Public Class Form1
Dim tempCookies As New CookieContainer
Dim byteData As Byte()
Private postData As String
Private postReq As HttpWebRequest
Private postreqstream As Stream
Private postresponse As HttpWebResponse
Dim encoding As New System.Text.UTF8Encoding
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
postReq = DirectCast(WebRequest.Create("https://pastebin.com/raw/bPc5Nec0"), HttpWebRequest)
postReq.Method = "GET"
postReq.KeepAlive = True
postReq.ContentType = "application/x-www-form-urlencoded"
postReq.UserAgent = "Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/83.0.4103.61 Safari/537.36"
postresponse = DirectCast(postReq.GetResponse(), HttpWebResponse)
Dim postreqreader As New StreamReader(postresponse.GetResponseStream())
Dim thepage1 As String = postreqreader.ReadToEnd
Application.DoEvents()
End Sub
End Class
تفضل تعمل بشكل صحيح
هذه الطريقه الصحيحه للأتصالا
اهتم اكتر بال ContentType
و ال UserAgent
(15-12-22, 03:00 AM)Meroo1809 كتب : [ -> ]السلام عليكمالسلام عليكم
في مشكلة بتظهر في كود في البرنامج بتاعي مكنتش بتظهر وبحاول احدد مكان المشكلة مش عارف ياريت حد يعرف يساعدني
صورة للمشكلة
(17-12-22, 01:12 AM)kebboud كتب : [ -> ]انا اسف(15-12-22, 03:00 AM)Meroo1809 كتب : [ -> ]السلام عليكمالسلام عليكم
في مشكلة بتظهر في كود في البرنامج بتاعي مكنتش بتظهر وبحاول احدد مكان المشكلة مش عارف ياريت حد يعرف يساعدني
صورة للمشكلة
أخي ..قبل أن تتعلم كيف تبرمج حاول أن تتعلم كيف تكتب عبارات عربية صالحة ..قبل أن تتعلم البرمجة حاول أن تتعلم لغتك الجميلة لتكتب كلاما صحيحا سالما من الأخطاء الإملائية و النحوية و التركيبية !!
أخي و الله لقد سئمنا هذه العبارات اللغوية الخاطئة التي يعج بها هذا المنتدى العريق
و اعلم أخي أن قصدي الإصلاح فقط لا التحدي و الإحراج !!!
لا حول و لا قوة إلا بالله