Italian esecuzione automatica di campo di testo su pagina html

Discussion in 'Italian Forum' started by fifiddu70, Jul 27, 2018.

Similar threads

Italian Gestine mappe
Italian Testo Tmemo
Italian Adorabile PHP
B4A Library Upload file with php
Italian Esempio Pagina Php e Db Mysql
  1. fifiddu70

    fifiddu70 Well-Known Member Licensed User

    ciao a tutti, ho bisogno di eseguire in maniera automatica una pagina html dove all'interno si trova un campo testo ed un pulsante invio.
    all'interno della mia app ho una edittex dove inserisco un numero e vorrei che questo numero va ad inserirsi nel campo di testo della pagina html e dopo in automatico far partire il pulsante invio sempre da, lla pagina html, qualcuno mi sa dire come fare?
    questo il codice html della pagina
    Code:
    <html>
    <head></head>
    <body>
    <
    form name="modulo" method="POST" action="elimina.php">
    <input 
    type="text" name="variabile" value="">
    <input 
    type="submit" value="ok">
    </body>
    </html>
     
  2. MarcoRome

    MarcoRome Expert Licensed User

    Puoi utilizzare la libreria WebviewExtra2, il codice potrebbe essere di questo tipo ( non testato in questo caso ma precedentemente su altro e funziona )


    Code:
    Private btn_scan As Button
        
    Private WebView1 As WebView

        
    Dim WebView1 As WebView
        
    Dim WebViewExtras1 As WebViewExtras
        
    Dim variabile as String
     
    End Sub

    Sub Activity_Create(FirstTime As Boolean)
        
    'Do not forget to load the layout file created with the visual designer. For example:
        Activity.LoadLayout("1")
       
        variabile = 
    "pippo"
     
        WebViewExtras1.Initialize(WebView1)
        
    Dim WebChromeClient1 As DefaultWebChromeClient
        WebChromeClient1.Initialize(
    "WebChromeClient1")
        WebViewExtras1.SetWebChromeClient(WebChromeClient1)
        WebView1.LoadHtml(
    $"
    <html>
    <head></head>
    <body>
    <form name="modulo" method="POST" action="elimina.php">
    <input type="text" name="$
    {variabile}" value="">
    <input type="submit" value="ok">
    </body>
    </html>
    "$
    )
        
    End Sub

    Sub Activity_Resume
       
            
    Log("WebView1_PageFinished")
                
    Dim Javascript As StringBuilder
                Javascript.Initialize
                Javascript.Append(
    "var form=document.forms[1];")   '   Assumendo che il pulsante sia il secondo oggetto sulla tua pagina
                Javascript.Append("form.submit()")
                WebViewExtras1.ExecuteJavascript(Javascript.ToString)
              
       
    End Sub


    Sub WebChromeClient1_ConsoleMessage(ConsoleMessage1 As ConsoleMessage) As Boolean
        
    Log("WebChromeClient1_ConsoleMessage")
        
    Log(ConsoleMessage1.Message)
    End Sub
     
    Last edited: Jul 27, 2018
    sirjo66 and Star-Dust like this.
  3. fifiddu70

    fifiddu70 Well-Known Member Licensed User

    Grazie per la tua risposta MarcoRome, scusami per il ritardo nella mia risposta, sono stato impegnato sul lavoro, nel frattempo io avevo già risolto in questo modo, poi mi sono accorto della tua risposta, però non so se il tuo codice funziona e magari sia migliore come soluzione, ti faccio vedere il mio pezzo di codice che mi ha risolto il problema:
    Code:
    Dim Javascript As StringBuilder
                Javascript.Initialize
                Javascript.Append(
    "document.forms[0].variabile.value='""B" & txtconteggio2.text & "';")
                Javascript.Append(
    "document.forms[0].submit()")
                
    Log("Executing javascript: "&Javascript.ToString)
            
                
    Dim WebViewExtras1 As WebViewExtras
                WebViewExtras1.executeJavascript(webview1, Javascript.ToString)
    ovviamente il tuo vedo che è molto più articolato, magari anche più funzionante,lo devo provare, in tal caso dove inserisco la edittex ( txtconteggio2.text ) ?
    sono curioso di vedere in funzione il tuo codice come si comporta.
     
Loading...
  1. This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
    By continuing to use this site, you are consenting to our use of cookies.
    Dismiss Notice