Lo que se me ocurre seria en tu consulta, primero hacer un oldbdatareader que lea el dato que pedis en la consulta osea ( wehere tal cosa= tal otra), luego preguntas si el dataread leyo algo, si te responde si, entonces, derivas a una funcion que se llame Actualiza( datos1, datos 2) y sino, a una que se llama Inserta( datos 1, datos 2 )
el codigo fuente seria mas o menos asi:
Código PHP:
Function leerporsiexiste(ByVal dato1, ByVal dato2, ByVal dato3)
Try
Dim con As OleDbConnection
con = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mapPath("mibase.mdb") & "")
Dim dr As OleDbDataReader
Dim sql As String = "SELECT * FROM (mitabla)WHERE ((mitabla.midato1)='" & dato1& "') ;"
Dim dralu As OleDbDataReader
Dim cmd As OleDbCommand
cmd = New OleDbCommand(sql, con)
con.Open()
dralu = cmd.ExecuteReader
If dralu.Read Then
Actualiza(dato1,dato2,dato3)
Else
Inserta(dato1,dato2,dato3)
End If
con.Close()
cmd.Dispose()
con.Dispose()
Catch err As OleDbException
Throw err
Catch err As Exception
Throw err
End Try
Luego las funciones iactualiza o inserta, las haces como siempre, con la sentencia update, y con insert.
Espero te sirva