تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] عمل برنامج تجريبي بالتاريخ والوقت من موقع
#1
السلام عليكم ورحمة اللة وبركاتة

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

ولكن بعد فترة فشل الاكواد

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

دية الاكواد وانا خلصت برنامجي وحفظتة برقم الهارد ولكن اريد التحكم في العملاء

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


كود :
Imports System.Text
Imports System.Threading
Public Class Form1
    Dim End_d As String = "31/12/2013"
    Dim worl_D As String
    Dim W_req As WebRequest
    Dim W_resp As WebResponse
    Dim D_str As Stream
    Dim S_read As StreamReader
    Dim Th_1 As Thread
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Th_1 = New Thread(AddressOf _Load_Bage_)
        Th_1.Start()
    End Sub
    Private Sub _Load_Bage_()
        Try
            W_req = WebRequest.Create("http://cocoo.orgfree.com/xtest.php")
            W_resp = W_req.GetResponse()
            D_str = W_resp.GetResponseStream()
            S_read = New StreamReader(D_str)
            worl_D = S_read.ReadToEnd
            If worl_D = End_d Then
                MsgBox("انتهي الاصدار التجريبى جاري اغلاق البرنامج", MsgBoxStyle.Critical)
                End
            Else
                MsgBox("لم ينتهي الاصدار التجريبى")
            End If
        Catch ex As Exception
            MsgBox("فشل الاتصال بصفحة التاريخ جاري اغلاق البرنامج", MsgBoxStyle.Critical)
            End
        End Try
    End Sub
End Class
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] كيف ابطل زر tab فى برنامج على الفيجوال بيسك Mohamed371 1 32 20-01-17, 02:11 AM
آخر رد: مساعدة
  ارجوا المساعدة في برنامج محاسبة فيجوال بيسك 2008 محمد بوقزاحة 8 190 19-01-17, 01:30 PM
آخر رد: محمد بوقزاحة
  [اقتراح] كيف ممنكن اتجاوز برنامج التجريبي 3asfa~mdmra 10 224 15-01-17, 04:00 AM
آخر رد: الماجيك مسعد
  برنامج شبية بالـTeemView Basil Abdallah 21 508 11-01-17, 11:05 PM
آخر رد: Basil Abdallah
  [VB.NET] برنامج يقوم بالفحص عن الجروبات المشترك فيها muhnnad002016 1 68 06-01-17, 02:19 PM
آخر رد: Basil Abdallah
Heart [VB.NET] احتاج الى مساعدة في برنامج لمحل لحساب الفاتورة malek369 0 84 05-01-17, 09:50 AM
آخر رد: malek369
  [VB.NET] تصميم برنامج معامل engmedomed@gmail.com 1 113 03-01-17, 03:51 PM
آخر رد: thevirus
  [VB.NET] فكرة عن برنامج 3asfa~mdmra 4 140 01-01-17, 09:15 AM
آخر رد: مساعدة
  [سؤال] كيف اعمل برنامج يعمل في الخفاء ddemed 17 437 21-12-16, 12:39 PM
آخر رد: Basil Abdallah
  كيفيه تسطيب برنامج بال VB ddemed 2 93 17-12-16, 03:56 PM
آخر رد: ddemed

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم