18721107673
类不支持自动化(automaition)或不支持期待的接口
------------------------------------------------------------------
------------------------------------------------------------------
解决方案:
在语句: [ Set cnn = New ADODB.Connection ] 后面
加上 : [ Set rs = New ADODB.Recordset ]