主题:  从EXCEL表读入的内容与数据库字段判断的问题

万木春
职务：普通成员
等级：1
金币：0.0
发贴：165
#12005/10/9 20:53:28
我在做一个从EXCEL表中读出数据放入到SQLSERVER表的ASP程序，我的想法是这样，EXCEL表第1列是序号，如果判断没有序号则整行不读，如果EXCEL表第2列单元格的内容与数据库“Code”字段的内容相同则不读而跳过读下一条，我现在用以下代码做发觉EXCEL第2列单元格的内容与数据库“Code”字段相同时并没有按我的要求跳过而仍被加入数据库，另外如果数据库为空时出现出错提示而没有把EXCEL表第2列单元格的内容添加到数据库，请各位高手指点。
set objExcelSheet = objExcelBook.Sheets(1)
i=7
    
while objExcelSheet.cells(i,1)<>""
if rs("Code".value<>objExcelSheet.cells(i,2) then
rs.addnew
rs("Code"=objExcelSheet.cells(i,2)
rs.update
end if
i=i+1
wend



万木春
职务：普通成员
等级：1
金币：0.0
发贴：165
#22005/10/12 10:17:50
改成下面这样仍不行：if rs("Code".value<>cstr(objExcelSheet.cells(i,2).value) 如同虚设，虽然数据库Code字段已有与objExcelSheet.cells(i,2).一样的值但仍被添加，郁闷，请大家快帮帮我吧，实在没招了。
do while not rs.eof
while objExcelSheet.cells(i,1)<>""
if rs("Code".value<>cstr(objExcelSheet.cells(i,2).value) then
     rs.addnew
rs("Code"=objExcelSheet.cells(i,2)

rs.update
     end if
i=i+1
    wend    
    rs.movenext
    
loop