Dim cnn1 AS New SqlConnection( _ «Data Source=(local);» & _ «Initial Catalog=SSMProcFunc;» & _ «User ID = SSMProcFuncU1; « & _ «Password= SSMProcFunc») cnn1.Open
Dim cnn1 AS New SqlConnection( _ «Data Source=(local);» & _ «Initial Catalog=SSMProcFunc;» & _ «User ID = SSMProcFuncU1; « & _ «Password= SSMProcFunc») cnn1.Open