MS_10.11.2015
This commit is contained in:
@@ -128,7 +128,7 @@ Public Class frmConnections
|
||||
Case "MS-SQLServer"
|
||||
Dim con As String
|
||||
If CheckBoxwin_aut.Checked Then
|
||||
con = "Data Source=" & Me.SERVERTextBox.Text & ";Initial Catalog=" & Me.cmbDatabase.Text & ";Trusted_Connection=True;"
|
||||
con = "Server=" & Me.SERVERTextBox.Text & ";Database=" & Me.cmbDatabase.Text & ";Trusted_Connection=True;"
|
||||
Else
|
||||
con = "Server=" & Me.SERVERTextBox.Text & ";Database=" & Me.cmbDatabase.Text & ";User Id=" & Me.USERNAMETextBox.Text & ";Password=" & Me.PASSWORDTextBox.Text & ";"
|
||||
End If
|
||||
@@ -193,9 +193,10 @@ Public Class frmConnections
|
||||
Case "MS-SQLServer"
|
||||
Dim con As String
|
||||
If CheckBoxwin_aut.Checked Then
|
||||
con = "Data Source=" & Me.SERVERTextBox.Text & ";Initial Catalog=" & Me.cmbDatabase.Text & ";Trusted_Connection=True;"
|
||||
con = "Server=" & Me.SERVERTextBox.Text & ";Database=" & Me.cmbDatabase.Text & ";Trusted_Connection=True;"
|
||||
Else
|
||||
con = "Server=" & Me.SERVERTextBox.Text & ";Database=" & Me.cmbDatabase.Text & ";User Id=" & Me.USERNAMETextBox.Text & ";Password=" & Me.PASSWORDTextBox.Text & ";"
|
||||
|
||||
End If
|
||||
'csb.DataSource = Me.txtDataSource.Text
|
||||
'csb.IntegratedSecurity = False
|
||||
|
||||
Reference in New Issue
Block a user