aaa="provider=Microsoft.Jet.OLEDB.4.0; Data Source="&aa&";Extended Properties=Excel 8.0"
   

   set StrConnect=CreateObject("ADODB.Connection")
StrConnect.Open aaa

''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
 '''''''''''''''''''' Set   objConn=CreateObject("ADODB.Connection")
  
  ''''''''''''''''''''objConn.Open   StrConnect   
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

对，那块是有错误，
我注释掉了,没有用它,
但改后还是出现这种问题啊

就是第一条记录导入不进去啊