Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Puoi fare tutto con una semplice post lato client e gestirla sul tuo server lato php:
- [CODE]
- Private Sub checkOnline(bool inEsecuzione)
- Dim s As HttpWebRequest
- Dim enc As UTF8Encoding
- Dim postdata As String
- Dim postdatabytes As Byte()
- s = HttpWebRequest.Create("http://www.tuosito.com/check.php")
- enc = New System.Text.UTF8Encoding()
- if(inEsecuzione)
- postdata = "start=1"
- else
- postdata = "start=0"
- postdatabytes = enc.GetBytes(postdata)
- s.Method = "POST"
- s.ContentType = "application/x-www-form-urlencoded"
- s.ContentLength = postdatabytes.Length
- Using stream = s.GetRequestStream()
- stream.Write(postdatabytes, 0, postdatabytes.Length)
- End Using
- Dim result = s.GetResponse()
- End Sub
- [/CODE]
- All'avvio del software:
- [CODE]checkOnline(true)[/CODE]
- Al termine del software:
- [CODE]checkOnline(false)[/CODE]
- Codice PHP (check.php):
- [CODE]
- <?php
- $file = "/tuofile.txt";
- if (isset($_POST["start"]))
- {
- //Ti recuperi il valore della POST
- $connesso = intval($_POST["start"]);
- if (connesso == 1)
- {
- //Aggiungi al counter nel file txt
- $numUtentiConnessi = intval(file_get_contents($file));
- $numUtentiConnessi += 1;
- file_put_contents($file, $numUtentiConnessi);
- }
- else
- {
- //Utente disconnesso sottrai dal counter nel file txt
- $numUtentiConnessi = intval(file_get_contents($file));
- $numUtentiConnessi -= 1;
- file_put_contents($file, $numUtentiConnessi);
- }
- }
- else
- exit();
- ?>
- [/CODE]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement