llerik Цитата: дальше сверялся по нажатию на кнопку.
Не понял, что значит "сверить" и для чего логины.
Если для захода на SQL Server, то там passwords не лежат в открытом доступе. Да и сверять для логина ничего не надо.
Создается connection. Если не вернула error, значит логин правильный.
Или же логины для чего-либо еще?
Код: Try
Dim cnn As New SqlConnection
Dim ConnectionString as string
ConnectionString = "Data Source=" & [имя сервера] & ";async=true;Initial Catalog=" & [имя базы] & ";Persist Security Info=True;User " & "ID=" & [логин ID] & ";Password=" & [пас] & ";Connect Timeout=300"
If ConnectionString <> "" Then
cnn = New SqlConnection(ConnectionString)
cnnLaw.Open()
End if
Catch ex As Exception
msgbox ex.ToString & " " & ex.Message
End Try