[hassan]

(13-04-16, 03:57 PM)mostfa1995 كتب :

(13-04-16, 07:15 AM)hassan كتب :

(13-04-16, 03:38 AM)mostfa1995 كتب :

طلب كود معرفة كام شخص فاتح البرنامج

تفضل

PHP كود :

Imports System.NetImports System.Net
Public Class Form1


    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim ds As New Net.WebClient()
        ds.Credentials = New Net.NetworkCredential("اسم المستخدم في ftp", "الرقم السري")
        Label1.text = ds.DownloadString("ftp:\\اسم ملف txt")
        Label1.text = Val(Label1) + Val("1")
        ds.UploadString("ftp:\\اسم ملف txt")
    End Sub
End Class 


قم بتغيير المطلوب الموضح في الكود وان شاء الله يقوم ب المطلوب

ملاحضة : قبل استخدام هاذا الكود قم بوضع رقم 0 في ملف التكست المرفوع والذي يجب كتابته في الكود

شكرا لك

تفضل اخي

PHP كود :

ds.UploadString("ftp:\\اسم ملف txt", Label1.text) 


شكرا لك