Hey Leute, ich habe folgendes Problem:
Ich möchte ein Programm für mein GTA Server Coden. In diesem Programm soll man PC (Premium Coins) auflanden können und sich Items kaufen können. Das alles basiert FTP bedingt.
Für jeden Benutzer der Premium besitzt, wurde eine Textdatei mit dem Benutzernemen erstellt, und in der Textdatei stehen dann die Premium Coins. Nun brauche ich es so, dass Wenn das Programm startet, dass dann zu erst die Coins abgerufen werden. Für die Coins benutze ich Label4.text.
Imports System.Net
Public Class Form2
Private WithEvents WebClient1 As New WebClient
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Start()
timer2.start()
Label2.Text = Form1.TextBox2.Text
Label8.Text = Form1.TextBox1.Text
Label4.Text = WebClient1.DownloadString("http://germanrl-vb.24.eu/GRLPremium/") // Da soll der Benutzername rein, wie er in Label2.text steht. ("http://germanrl-vb.24.eu/GRLPremium/", & "Label2.text.txt") geht leider nicht. Hat jmd eine Ahnung wie das geht?
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Hier soll dann wenn man auf den Button klickt das Item kaufen, und 1 Premium Coin abgezogen werden. das habe ich so gemacht:
Label4.Text = WebClient1.DownloadString("http://germanrl-vb.24.eu/GRLPremium/") - 1 // Hier das gleiche Problem wie oben.
wenn ich auf den button 2x klicke, wird der eine coin net mehr abgezogen. z.B ich habe 10 Premum Coins: Beim 1. Klick steht dann 9, aber beim 2. imemr noch.
Dann soll der Aktuelle Status an Premium Coins wieder hochgelden werden, das steht in Label4.text. Außerdem sollen die Coins dan natürlich in die text datei von dem Benutzer hochgeladen werden.
WebClient1.UploadString("http://germanrl-vb.24.eu/GRLPremium/", & "Label2.text") //Dann weider iwie so, aber dazu soll noch Label4.text die aktuelle datei überchreiben. das dann iwie so
WebClient1.UploadString("http://germanrl-vb.24.eu/GRLPremium/", & "Label2.text") = Label4.text
Ich bitte um Hilfe, sonst komme ich nicht weiter.
Ich möchte ein Programm für mein GTA Server Coden. In diesem Programm soll man PC (Premium Coins) auflanden können und sich Items kaufen können. Das alles basiert FTP bedingt.
Für jeden Benutzer der Premium besitzt, wurde eine Textdatei mit dem Benutzernemen erstellt, und in der Textdatei stehen dann die Premium Coins. Nun brauche ich es so, dass Wenn das Programm startet, dass dann zu erst die Coins abgerufen werden. Für die Coins benutze ich Label4.text.
Imports System.Net
Public Class Form2
Private WithEvents WebClient1 As New WebClient
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Start()
timer2.start()
Label2.Text = Form1.TextBox2.Text
Label8.Text = Form1.TextBox1.Text
Label4.Text = WebClient1.DownloadString("http://germanrl-vb.24.eu/GRLPremium/") // Da soll der Benutzername rein, wie er in Label2.text steht. ("http://germanrl-vb.24.eu/GRLPremium/", & "Label2.text.txt") geht leider nicht. Hat jmd eine Ahnung wie das geht?
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Hier soll dann wenn man auf den Button klickt das Item kaufen, und 1 Premium Coin abgezogen werden. das habe ich so gemacht:
Label4.Text = WebClient1.DownloadString("http://germanrl-vb.24.eu/GRLPremium/") - 1 // Hier das gleiche Problem wie oben.
wenn ich auf den button 2x klicke, wird der eine coin net mehr abgezogen. z.B ich habe 10 Premum Coins: Beim 1. Klick steht dann 9, aber beim 2. imemr noch.
Dann soll der Aktuelle Status an Premium Coins wieder hochgelden werden, das steht in Label4.text. Außerdem sollen die Coins dan natürlich in die text datei von dem Benutzer hochgeladen werden.
WebClient1.UploadString("http://germanrl-vb.24.eu/GRLPremium/", & "Label2.text") //Dann weider iwie so, aber dazu soll noch Label4.text die aktuelle datei überchreiben. das dann iwie so
WebClient1.UploadString("http://germanrl-vb.24.eu/GRLPremium/", & "Label2.text") = Label4.text
Ich bitte um Hilfe, sonst komme ich nicht weiter.
