从table 中读取数据
判断table.convert项长度是否大于200字节
如果大于
判断其table.title 项是否在table2.title中存在
存在 去读TABLE下一条
不存在 将其插入到TABLE2中
如果小于
去读TABLE下一条
循环...
帮我解决问题的送2万条报纸新闻 .MDB 截止昨天的
QQ MSN传都行
------解决方案--------------------
看似很乱,多表查询。
sql= "select convert,title from table "
set rs=conn.Execute(sql)
if not rs.eof then
while not rs.eof
if len(rs( "convert "))> 200 then
sql2= "select * from table2 where title= ' "&rs( "title ")& " ' "
set rs2=conn.Execute(sql2)
if not (rs2.eof and rs2.bof) then
rs.movenext
else
insql= "insert into table2(title) values( ' "&rs( "title ")& " ') "
conn.Execute(insql)
end if
else
rs.movenext
end if
wend
end if
------解决方案--------------------
楼上的基本正确,个人感觉while-wend之外没必要再使用IF判断