oConn = CreateObject("ADODB.Connection") oDataLink = CreateObject("DataLinks") oConn = oDataLink.promptNew ? oConn.ConnectionString