Dim Str_Co As String = "host=" & Form1.server & ";" & _ "database=" & Form1.dbname & ";" & _ "user=" & Form1.user & ";" & _ "password=" & Form1.password
[Per vedere i link devi REGISTRARTI.]