Public Connected AS Integer Local ConnectString As String
ConnectString = "Driver={SQL Server};Server=MyServerName;"Database=myDatabaseName;Uid=myUsername;Pwd=myPassword"
Connected = SQLSTRINGCONNECT(ConnectString)