Conversione da VB6 a PHP

Gianky4747

Nuovo Utente
27 Gen 2019
16
0
1
PHP:
 Buongiorno a tutti sono nuovo del PHP ma vorrei sapere se possibile, come posso convertire questo semplice ciclo di visualizzazione numerico da VB6 a PHP...  Ho provato ma senza successo. 

[B]Dim E1
Ciclo:
  For X = 0 To 50:
    DoEvents
    Randomize Timer
    E1 = Int(Rnd * 500000):
    For p = 0 To 7000000: Next p: rem -- rallentamento
    Label20.Caption = E1
  Next X[/B]

Un grazie anticipato a voi esperti....
 

Gianky4747

Nuovo Utente
27 Gen 2019
16
0
1
Grazie, ma come posso fare per visualizzare i risultati all'interno di una casella di testo con una piccola pausa tra un risultato è l'altro?
 

macus_adi

Utente Attivo
5 Dic 2017
1.266
82
48
IT/SW
allora basterebbe solo un pò di JS... Lo inserisco nel tag PHP in quanto stiamo nella sezione PHP ma non è la soluzione ottima....
PHP:
$str='<table><tr><td id="change"></td><td></td></tr></table><script>
   
   function getRndInteger(min, max) {
     return Math.floor(Math.random() * (max - min + 1) ) + min;
   }
   setInterval(function(){
       document.getElementById("change").innerHTML=getRndInteger(0,100000);
   },2000);
   </script>';
echo $str;
Funzione random: https://www.w3schools.com/js/js_random.asp
Risorse utili: https://www.w3schools.com/js/js_ajax_http_send.asp
 
Ultima modifica:

Gianky4747

Nuovo Utente
27 Gen 2019
16
0
1
allora basterebbe solo un pò di JS... Lo inserisco nel tag PHP in quanto stiamo nella sezione PHP ma non è la soluzione ottima....
PHP:
$str='<table><tr><td id="change"></td><td></td></tr></table><script>
  
   function getRndInteger(min, max) {
     return Math.floor(Math.random() * (max - min + 1) ) + min;
   }
   setInterval(function(){
       document.getElementById("change").innerHTML=getRndInteger(0,100000);
   },2000);
   </script>';
echo $str;
Funzione random: https://www.w3schools.com/js/js_random.asp
Risorse utili: https://www.w3schools.com/js/js_ajax_http_send.asp
GRAZIE MOLTISSIMO !! - E' esattamente quello che cercavo di fare......
 

macus_adi

Utente Attivo
5 Dic 2017
1.266
82
48
IT/SW
Codice:
var interval=setInterval(function(){
       document.getElementById("change").innerHTML=getRndInteger(0,100000);
   },2000);
document.getElementById("change").on('click',function(){
     clearInterval(interval);
});