Alguien me puede decir donde esta el ERROR... Please!!!!
 
Tengo este IF,  el cual saca de una Tabla  un Valor Numerico (Guia)
 y si es el Ultimo Registro..  el Suma 1 y despues lo Inserta en la 
mism a Tabla...    Va el  Codigo.. 
<%
dim parcial
Set oConn = Server.CreateObject ("ADODB.Connection")
Set RS = Server.CreateObject ("ADODB.RecordSet")
oconn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="& server.mappath("Trans_Cantu.mdb") 
sql = "SELECT Guias FROM Datos"
RS.Open sql, oConn, 1,3 
If RS.EOF then 
Else
   Response.Write "Hasta este momento esta pagina fue ""visitada"":<B> "&RS("guias")&"</B>"
   parcial=rs("guias")+1
   rs("guias")=parcial
   Response.Write "Hasta este momento esta pagina fue ""visitada"":<B> "&RS("guias")&"</B>"
   sql="insert into datos (guias) values ("&request.form("Guias")&")"
   oConn.Execute(sql)
   Response.Write "Hasta este momento esta pagina fue ""visitada"":<B> "&RS("guias")&"</B>"
End IF 
rs.close
oConn.Close
Set RS = nothing
Set oConn = nothing
%> 
podrian Ayudarme.. ??? 
Saludos 

 Luis.R.Acosta