Connexion Mysql HOSTINGER

Version imprimable

Bonjour,
Je viens de creer une database sur hostinger et une table ( login ) pour mon programme.
le probleme c est que j ai mis se code

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
 Dim connexionsql As New MySqlConnection("serveur=mysql.hostinger.fr; Userid=XXXXXXXXXXx; password=XXXXXXXXX; database=XXXXXXXX;")
        Dim command As New MySqlCommand
        Dim reader As MySqlDataReader
        connexionsql.Open()
        command.Connection = connexionsql
        command.CommandText = "SELECT Username, Password FROM Login WHERE Username'" & TextBox1.Text & "' and Password'" & TextBox2.Text & "'"
        reader = command.ExecuteReader
        If reader.HasRows Then
            Form2.Show()
            Form3.Show()
        Else
            MsgBox("Le nom d'utilisateur ou le mot de passe n est pas correct.")
        End If

et quand je lance le programme apres avoir clique sur le bouton1
Il me dis Keyword Not Supported
voila un screen tu probleme http://prntscr.com/6hwmsl

17/03/2015, 16h00
jopopmk

Salut,

tu arrives à te connecter avec ce code sur ta DB locale ?
Ton erreur laisse penser que ta connection string n'est pas correcte.
(d'ailleurs quand on regarde ici elle n'a pas tout à fait la même forme)

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles OrainsButton1.Click
        Dim connexionsql As New MySqlConnection("Server=mysql.hostinger.fr;Database=XXXXXXX;Uid=XXXXXXXX;Pwd=XXXXXXX;")
        Dim command As New MySqlCommand
        Dim reader As MySqlDataReader
        connexionsql.Open()
        command.Connection = connexionsql
        command.CommandText = "SELECT Username, Password FROM Login WHERE Username'" & TextBox1.Text & "' and Password'" & TextBox2.Text & "'"
        reader = command.ExecuteReader
        If reader.HasRows Then
            Form2.Show()
            Form3.Show()
        Else
            MsgBox("Le nom d'utilisateur ou le mot de passe n est pas correct.")
        End If
    End Sub

On y ai presque je crois
J ai plus keyword not supported
J ai cela http://prntscr.com/6hwz0o
unable to connect to any of the specified MySql hosts

17/03/2015, 16h20
François M.

Bonjour

Je ne sais pas ce que c'est que hostinger mais tu es sur que tu peux sortir avec une connexion à une base depuis ton réseau ?
17/03/2015, 16h30
Security_VB

Oui je peux
17/03/2015, 16h32
jopopmk

Hostinger est un hébergeur qui propose des services gratuits.
Et il est tout à fait possible qu'il bloque les requêtes qui proviennent pas de leur(s) IP(s).

Si tu te connectes en ligne de commande avec "mysql -h ..." t'arrives à taper ta DB ?
17/03/2015, 16h44
Security_VB

Je n arrive pas a me connecter depuis mysql workbrench il me dis hote introuvable :/
pourtant quand j ai cree la db
il y avait :
base de donné mysql : uXXXXXXXX_XX
utilisateur mysql : uxxXXXXXX_XXX
hote Mysql ; mysql.hostinger.fr
17/03/2015, 16h46
Security_VB

Sinon je vais changer d hebergeur je verrais bien si sa fonctionne :)
17/03/2015, 16h54
jopopmk

Il arrive que certains hébergeurs (et encore plus souvent dans les offres gratuites) bloque les requêtes SQL ne provenant pas de chez eux.
Si tu as déjà tes crédentials pour le FTP essaie de pusher un fichier ASP.NET qui affiche le résultat d'une requête simple (genre "SELECT USER();").

Question : Hostinger fait de l'hébergement .NET gratuit maintenant ?
17/03/2015, 17h39
Security_VB

A j ai trouve hostinger bloque les connexions exterieur a la database Donc c est payant

C est bon j ai regle le probleme µ
il y a une autre erreur

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
    Private Sub OrainsButton1_Click(sender As Object, e As EventArgs) Handles OrainsButton1.Click
        Dim connexionsql As New MySqlConnection("Server=XXXXXXX;User=XXXX;Password=XXXXXX;database=XXXXX")
        Dim command As New MySqlCommand
        Dim reader As MySqlDataReader
        connexionsql.Open()
        command.Connection = connexionsql
        command.CommandText = "SELECT Username, Password FROM Login WHERE Username'" & OrainsTextBox1.Text & "' and Password'" & OrainsTextBox2.Text & "'"
        reader = command.ExecuteReader 
        If reader.HasRows Then
            Form2.Show()
            Form3.Show()
        Else
            MsgBox("Le nom d'utilisateur ou le mot de passe n est pas correct.")
            connexionsql.Close()
        End If
    End Sub

http://prntscr.com/6hyo2m screen