Public Overrides Function CalculateConnectionString( _
ByVal arguments As System.Collections.Generic.ICollection( _
Of Microsoft.Web.Management.DatabaseManager.ConnectionArgument)) As String
Dim builder As OleDbConnectionStringBuilder = New OleDbConnectionStringBuilder
For Each argument As ConnectionArgument In arguments
Select Case (argument.Name)
Case "Provider"
builder.Provider = argument.Value
Case "Data Source"
builder.DataSource = argument.Value
Case "Jet OLEDB:Database Password"
builder.Add(argument.Name, argument.Value)
Case Else
Throw New ArgumentException(String.Format("The argument {0} is unexpected for this database provider!", argument.Name))
End Select
Next
Return builder.ToString
End Function