Italian [risolto] CONNESSIONE REMOTA A DB SU RETE LAN

Mastrantoni Piero

Member
Licensed User
Longtime User
Scusate ma non capisco dove sta l'errore.

Premesso che utilizzo la libreria SD_SQL
1- il mio database si chiama MultiServer (db sqlserver)
2- indirizzo ip dove collegarmi 192.168.1.15 (ip del server)
3- la mia Istanza e' SqlExpress

ed ecco il corpo del reato :

Dim MSSQL As SD_SQL
Private MSLocation As String = "192.168.1.15/MultiServer:1433;instanceName=sqlserver;databaseName=MultiServer;user=sa;password=piero;encrypt=true;trustServerCertificate=false;loginTimeout=30;"
Private MSUsername As String = "sa"
Private MSPassword As String = "pippo"

MSSQL.Initialize(Me,"MSSQL","net.sourceforge.jtds.jdbc.Driver", $"jdbc:jtds:sqlserver://${MSLocation}/test"$, MSUsername, MSPassword)

Wait For MSSQL_Ready(Success As Boolean)
If Success Then
Dim RS As SD_ResultSet = MSSQL.ExecQuery("SELECT * FROM tabella")
Do While RS.NextRow
Log(RS.GetString2(0))
Loop
End If

la variabile "Success" mi restituisce sempre "false"

grazie anticipatamente per l'aiutino.
 

Star-Dust

Expert
Licensed User
Mi pare che metti user e password sia nella stringa di connessione che nei parametri della classe... ti pare corretto?

Vedi gli esempi nel post#2 della.classe Sd_Sql, sono inseriti per capire come usare i parametri.

PS. Il codice inseriscilo sempre nella finestra di codice altrimenti risulta illeggibile
 

Mastrantoni Piero

Member
Licensed User
Longtime User
questo e' cio' che ottengo

1640708644307.png
 

Star-Dust

Expert
Licensed User
hai sbagliato i parametri. Non devi semplicemente ricopiare il codice di esempio, ma capire i parametri da passare e mettere quelli tuoi

comunque non postare foto, basta il codice dentro la casella CODICE
1640709328726.png
 

Star-Dust

Expert
Licensed User
Hai sbagliato initialize. Ma non posso aiutarti se non posti il codice.

Comunque non ne esci se non guardi bene cosa è scritto.....
 

Mastrantoni Piero

Member
Licensed User
Longtime User
codice:
    Dim MSSQL As SD_SQL
    Private MSLocation As String = "192.168.1.15/MultiServer:1433;loginTimeout=30;"
    Private MSUsername As String = "sa"
    Private MSPassword As String = "piero"

    MSSQL.Initialize(Me,"MSSQL","net.sourceforge.jtds.jdbc.Driver", $"jdbc:jtds:sqlserver://${MSLocation}"$, MSUsername, MSPassword)
    Wait For MSSQL_Ready(Success As Boolean)
    If Success Then
        Dim RS As SD_ResultSet = MSSQL.ExecQuery("SELECT * FROM PERSONALE")
        Do While RS.NextRow
            Log(RS.GetString2(0))
        Loop
    End If
 

Star-Dust

Expert
Licensed User
B4X:
    Dim MSSQL As SD_SQL
    Private MSLocation As String = "192.168.1.15"
    Private MSUsername As String = "sa"
    Private MSPassword As String = "piero"

    MSSQL.Initialize(Me,"MSSQL","net.sourceforge.jtds.jdbc.Driver", $"jdbc:jtds:sqlserver://${MSLocation}/MultiServer"$, MSUsername, MSPassword)
    Wait For MSSQL_Ready(Success As Boolean)
    If Success Then
        Dim RS As SD_ResultSet = MSSQL.ExecQuery("SELECT * FROM PERSONALE")
        Do While RS.NextRow
            Log(RS.GetString2(0))
        Loop
    End If

Assicurati di avere anche i file jar corretti
 

Star-Dust

Expert
Licensed User
Che sarebbero quali?
(non e' per me, sto interpretando il pensiero di Piero, quindi se necessario insulta pure lui)

😆😅😂
Dove ha scaricato la libreria ci sono i link per i file jar necessari.
(Interpreto il pensiero dell'autore della libreria che ha scritto il tutorial perchè sia letto :p)
 

Star-Dust

Expert
Licensed User
#AdditionalJar: jtds-1.3.1.jar

ho copiato il codice che hai postato, ma nulla stesso problema
jtds-1.3.1.jar lo hai scaricato e copiato nella cartella delle librerie?
 

Star-Dust

Expert
Licensed User
Comunque se vai nel sorgente della libreria trovi anche gli eventi che solleva in caso di errore e puoi capire la ragione della mancata connessione.
Nei log cosa ti esce?
 

LucaMs

Expert
Licensed User
Longtime User
Nei log cosa ti esce?
A me è appena uscita... un'ernia, cercando di risolvere un problema "simile" (si fa per dire), di un amico!
Oh, non siamo riusciti a risolvere!

(Non c'entra la tua libreria, @Star-Dust, è che volevo sfogarmi e fare la battuta sull'ernia 😄)
 

Star-Dust

Expert
Licensed User
A me è appena uscita... un'ernia, cercando di risolvere un problema "simile" (si fa per dire), di un amico!
Oh, non siamo riusciti a risolvere!

(Non c'entra la tua libreria, @Star-Dust, è che volevo sfogarmi e fare la battuta sull'ernia 😄)
Diciamo che ci sono tanti fattori che impediscono queste connessioni, non per ultimo il firewall, il cambio di porta ecc....
 
Top