Italian connettersi ad un database su server

carminevarone

New Member
Salve a tutti.
Ho un problema al quale vorrei ottenere,se è possibile,una risposta.
Praticamente vorrei far si che la mia applicazione possa collegarsi al database di un mio sito.
Io uso altervista e per il db uso phpmyadmin(servizio offerto da altervista).
Quali istruzioni e quali librerie utilizzare per rendere tutto ciò possibile?
Mi servirebbero dunque le istruzioni per connettermi al database e quelle per estrarre e aggiungere dati.
Ringrazio in anticipo per l'attenzione e per le risposte
 

Teknomatica

Member
Licensed User
Longtime User
Salve a tutti.
Ho un problema al quale vorrei ottenere,se è possibile,una risposta.
Praticamente vorrei far si che la mia applicazione possa collegarsi al database di un mio sito.
Io uso altervista e per il db uso phpmyadmin(servizio offerto da altervista).
Quali istruzioni e quali librerie utilizzare per rendere tutto ciò possibile?
Mi servirebbero dunque le istruzioni per connettermi al database e quelle per estrarre e aggiungere dati.
Ringrazio in anticipo per l'attenzione e per le risposte

Caro Carmine,
Non si espone mai il db agli accessi dall'esterno.
In genere si utilizza un webservice oppure delle pagine che rispondono alle chiamate. Inoltre questo sistema ti svincola dal db che, in questo modo, potrà essere qualunque senza che tu debba cambiare la tua App.

Buon lavoro
 

ivanomonti

Expert
Licensed User
Longtime User
Posso creare database sperimentale

Ciao se serve un database sperimentale posso crearlo io con register, ovviamente servono delle regole chiare.

In questo modo e possibile creare applicazioni che fanno richiesta al server msql diretto posso anche creare unaa sezione ftp per eventuali webserver.

Contattatemi per il servizio... gratis o in cambio di un caffè in buona salute
 

arenaluigi

Well-Known Member
Licensed User
Longtime User
Ciao se serve un database sperimentale posso crearlo io con register, ovviamente servono delle regole chiare.

In questo modo e possibile creare applicazioni che fanno richiesta al server msql diretto posso anche creare unaa sezione ftp per eventuali webserver.

Contattatemi per il servizio... gratis o in cambio di un caffè in buona salute

Ivano,
register ti permette di creare delle interfacce con il db ? tipo dei web service ?
Oppure ti sviluppi l'adapter tra l'applicazione client ed il tuo db ?
 

ivanomonti

Expert
Licensed User
Longtime User
Ivano,
register ti permette di creare delle interfacce con il db ? tipo dei web service ?
Oppure ti sviluppi l'adapter tra l'applicazione client ed il tuo db ?

IL mio piano mi permette quanto segue

1) creare infiniti database
2) interfacciarsi in modo diretto su porta 3306
3) fare pagine php come webservice

Insomma tutto.
 

giannimaione

Well-Known Member
Licensed User
Longtime User
Altervista se non sbaglio non ti permette di collegarti al mysql, per questioni di sicurezza.
Comunque per conferma scrivi al support, sono molto gentili.
luigi ti sbagli...
prova questo (mi raccomando.... fai il bravo!)
B4X:
'Activity module
Sub Process_Globals
   'These global variables will be declared once when the application starts.
   'These variables can be accessed from all modules.
   Dim hc As HttpClient
End Sub

Sub Globals
   'These global variables will be redeclared each time the activity is created.
   'These variables can only be accessed from this module.

End Sub

Sub Activity_Create(FirstTime As Boolean)
   hc.Initialize("hc")
   Dim req As HttpRequest
   Dim web As String
   Dim query As String
   query="select firstname , lastname from address"
   'query="insert into address (firstname , lastname) values ('aa','bbb')"

   web="http://giannimaione.altervista.org/demo.php"
   req.InitializePost2(web, query.GetBytes("UTF8"))
   hc.Execute(req, 1)
   'hc.Execute(req,2)
End Sub
Sub hc_ResponseError (Response As HttpResponse, Reason As String, StatusCode As Int, TaskId As Int)
   Msgbox("errore","")
End Sub
Sub hc_ResponseSuccess (Response As HttpResponse, TaskId As Int)
If TaskId=1 Then
   Dim res As String
   res = Response.GetString("UTF8")
   Dim parser As JSONParser
   parser.Initialize(res)

   Dim countries As List
   countries = parser.NextArray 'returns a list with maps
   For i = 0 To countries.Size - 1
      Dim m As Map
      m = countries.Get(i)
      'We are using a custom type named TwoLines (declared in Sub Globals).
      'It allows us to later get the two values when the user presses on an item.
      Dim tl,t2 As String
      tl = m.Get("lastname")
      t2=m.Get("firstname")
      Msgbox(tl,t2)
   Next
   Response.Release
End If
   ExitApplication
End Sub
Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub
lo script demo.php è quello suggerito da Erel
ciao
 

arenaluigi

Well-Known Member
Licensed User
Longtime User
luigi ti sbagli...
prova questo (mi raccomando.... fai il bravo!)
B4X:
'Activity module
Sub Process_Globals
   'These global variables will be declared once when the application starts.
   'These variables can be accessed from all modules.
   Dim hc As HttpClient
End Sub

Sub Globals
   'These global variables will be redeclared each time the activity is created.
   'These variables can only be accessed from this module.

End Sub

Sub Activity_Create(FirstTime As Boolean)
   hc.Initialize("hc")
   Dim req As HttpRequest
   Dim web As String
   Dim query As String
   query="select firstname , lastname from address"
   'query="insert into address (firstname , lastname) values ('aa','bbb')"

   web="http://giannimaione.altervista.org/demo.php"
   req.InitializePost2(web, query.GetBytes("UTF8"))
   hc.Execute(req, 1)
   'hc.Execute(req,2)
End Sub
Sub hc_ResponseError (Response As HttpResponse, Reason As String, StatusCode As Int, TaskId As Int)
   Msgbox("errore","")
End Sub
Sub hc_ResponseSuccess (Response As HttpResponse, TaskId As Int)
If TaskId=1 Then
   Dim res As String
   res = Response.GetString("UTF8")
   Dim parser As JSONParser
   parser.Initialize(res)

   Dim countries As List
   countries = parser.NextArray 'returns a list with maps
   For i = 0 To countries.Size - 1
      Dim m As Map
      m = countries.Get(i)
      'We are using a custom type named TwoLines (declared in Sub Globals).
      'It allows us to later get the two values when the user presses on an item.
      Dim tl,t2 As String
      tl = m.Get("lastname")
      t2=m.Get("firstname")
      Msgbox(tl,t2)
   Next
   Response.Release
End If
   ExitApplication
End Sub
Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub
lo script demo.php è quello suggerito da Erel
ciao

Ciao Gianni, e non che non mi sbaglio :D
Tu accedi al database grazie ad una pagina php, io invece dico che non puoi puntare direttamente al server mysql per connetterti :sign0098:
 

giannimaione

Well-Known Member
Licensed User
Longtime User
parliamo e non ci capiamo...
Carmine ha detto che utilizza un DB su altervista
Tu accedi al database grazie ad una pagina php, io invece dico che non puoi puntare direttamente al server mysql per connetterti
hai ragione. dovresti disporre di un server "dedicato".
 
Last edited:

carminevarone

New Member
Perdonatemi,ma non mi è ben chiaro.
Dunque dovrei scrivere una pagina php tramite il quale ottenere dati dal db?
In questo caso,come posso tramite codice basic e dunque tramite l'applicazione inviare dati che poi questa pagina php inserirà nel database?
 
Top