ник: osmor
Серега!!!
а это зачем?
cbd.Execute "INSERT INTO MSysIMEXSpecs (DateDelim,DateFourDigitYear," & _
"DateLeadingZeros,DateOrder,DecimalPoint,FieldSeparator," & _
"FileType,SpecName,SpecType,StartRow,TimeDelim) " & _
"IN '" & .Fields("dstPath") & "' " & _
"SELECT DateDelim,DateFourDigitYear," & _
"DateLeadingZeros,DateOrder,DecimalPoint,FieldSeparator," & _
"FileType,SpecName,SpecType,StartRow,TimeDelim " & _
"FROM MSysIMEXSpecs " & _
"WHERE SpecName='" & Nz(.Fields("spcNam"), "") & "'", dbFailOnError