' cocoWrite userId = "" userPass = "" Set Ie = WScript.CreateObject("InternetExplorer.Application") Set objADO = CreateObject("ADODB.Connection") objADO.Open "dsn=smartmemo3;uid=" strSqlStmt = "select " & _ "search_key_phrase " & _ "from A…