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

نسخة كاملة : كود للتحقق من وجود ملف
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم


كود :
System.IO.File.Exists("file.txt")
نعرف هذا للتحقق من وجود ملف على الجهاز في مكان معين

طيب لو اريد اتحقق من وجود ملف على موقع معين كيف رح يكون الكود Huh
(29-05-22, 01:06 PM)نيمو كتب : [ -> ]السلام عليكم


كود :
System.IO.File.Exists("file.txt")
نعرف هذا للتحقق من وجود ملف على الجهاز في مكان معين

طيب لو اريد اتحقق من وجود ملف على موقع معين كيف رح يكون الكود Huh

وعليكم السلام
كود :
Public Function URLExists(ByVal url As String) As Boolean
   Net.ServicePointManager.SecurityProtocol = 3072
   Dim req = Net.WebRequest.Create(url)
   req.Method = "HEAD"
   Try
       Dim res As Net.HttpWebResponse = req.GetResponse
       Return (res.StatusCode.ToString = "OK")
   Catch
       Return False
   End Try
End Function

شرط أن يكون الملف عام
كود :
URLExists("https://website/file.txt")
عظيم ومبدع تسلم اخي

اسمك نيمو

Big Grin Big Grin 
تستحق الف شكر صار اسبوع احاول اصيغ الدالة ذي