2015-06-26 2 views
0

Я пытаюсь подключиться к базе данных SQL Server, которая не является локальной. У меня есть Источник данных и Начальный каталог - никаких проблем. Но нужно изменить Интегрированную защиту на False и вставить учетные данные SQL Server.Подключение к нелокальной базе данных SQL Server в VB.NET

Кто-нибудь есть идеи, как положить это в строку подключения?

Также, кто-нибудь знает, как обращаться с SecureStrings?

Вот мой код до сих пор:

Dim pwd As New SecureString("Password") 
Dim cred As New SqlCredential("Username", pwd) 
Dim sql As New SqlConnection("Data Source=OnlineServer;Initial Catalog=DatabaseName;Integrated Security=False") 

ответ

0

Я разработал то, что мне нужно было сделать, и как справиться с безопасными строками.

Вот фрагмент кода для тех, кто борется в будущем:

Imports System.Data.SqlClient 
Imports System.Net.Mail 
Imports System.Security 
Public Module secure 
    Public Function sql() 
     Dim pass As String = "Password" 
     Dim pwd As SecureString = New SecureString() 
     For Each ch As Char In pass 
      pwd.AppendChar(ch) 
     Next 
     pwd.MakeReadOnly() 
     Dim cred As New SqlCredential("SQL_Login", pwd) 
     Dim conn As New SqlConnection("Server=Database_Name;Initial Catalog=Database_Address;Integrated Security=False", cred) 
     Return conn 
    End Function 
End Module 

Public Class sqlCommunications 
    Dim sql As New SqlConnection 
    Dim sqlcom As New SqlCommand 
    Public Sub start() 
     sql = secure.sql 
     sqlcom.Connection = sql 
     sql.Open() 
     sql.Close() 
    End Sub 
End Class 
3

Посмотрите на здесь: SQL Connection Strings, мы надеемся найти какой вам нужно. Это даст вам основы.

Чтобы сделать учетные данные учетной записи SQL конфиденциальными, вы должны зашифровать раздел <connection strings> в файле web.config. сделать так:

aspnet_regiis -pe "connectionStrings" -app "OnlineServer" -prov "DataProtectionConfigurationProvider" 

Извлечение строку подключения с помощью ConfigurationManager будет автоматически расшифровывать Строка

Dim connectionString = ConfigurationManager.ConnectionStrings("MyConnectionString").ConnectionString 

Вот Microsoft Link, что объясняет его дальше.

+0

Я посмотрю, спасибо :) – Monica

Смежные вопросы