Díky za odpovědi. Bohužel se mi pořád nedaří, vyzkoušel jsem všechny výše napsané možnosti. SQL = "SET CHARACTER SET cp1250_czech_cs" - tak toto mi nebre vůbec a píše, že to nezná. Na ukázku posílám svůj kód (jedná se pouze o "hrátky" s databází, nikoliv vážný projekt, tak to tak prosím berte :)
Dim conn As New MySqlConnection
Dim myCommand, myCommand2 As New MySqlCommand
Try
'Otevření spojení.
With conn
.ConnectionString = login
.Open()
End With
'Command pro nastavení kódování.
With myCommand2
.Connection = conn
.CommandText = "SET NAMES cp1250"
.ExecuteNonQuery()
End With
'Command pro insert.
With myCommand
.Connection = conn
.CommandText = "INSERT INTO user (name, surname, date, description)" _
& "VALUES (?Name, ?Surname, ?Date, ?Description)"
End With
'Zadání hodnot parametrů SQL dotazu.
With myCommand
.Parameters.AddWithValue("?Name", Me.TextBox6.Text)
.Parameters.AddWithValue("?Surname", Me.TextBox7.Text)
.Parameters.AddWithValue("?Date", Now())
.Parameters.AddWithValue("?Description", Me.TextBox8.Text)
.ExecuteNonQuery()
End With
'Uzavření spojení a refresh formuláře.
conn.Close()
LoadDataMySQL()
|