关于access筛选问题
我想录入access中信息，其中有几个字段，如果字段年月日和站点筛选出来信息和录入的信息重复，则不录入，否则加一条信息。
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\1.mdb;"
strSQL = "select * from 记录 where 年月日= '" & t & "'and where 站点='" & righ(ii) & " '"

rs.Open strSQL, cn, 1, 1
If rs.RecordCount > 0 Then '根据关键字查找数据库是否有该记录,如果有
rs.Close
Set rs = Nothing
cn.Close
Set cn = Nothing '关闭数据库

Else
cn.Execute "insert into 记录(年月日,时间,站点,记录时间,处理情况) Values( '" & t & " ','" & tt & " ','" & righ(ii) & " ','" & ttime & "','1')"
Print righ(ii)
End If
rs.Close

cn.Close
End If

[解决办法]
http://download.csdn.net/source/1644211
[解决办法]