ilk aklıma gelen
Private Sub Yeni_Kayıt_Click()
On Error GoTo Err_Yeni_Kayıt_Click
DoCmd.GoToRecord , , acNewRec
'Aşağıya ekle
tarayici.Navigate "http:// http://www.sydgm.gov.tr/tr/yenikisikaydet.jsp"
Exit_Yeni_Kayıt_Click:
Exit Sub
Err_Yeni_Kayıt_Click:
MsgBox Err.Description
Resume Exit_Yeni_Kayıt_Click
End Sub
