Predmet:Re: Otvaranje više web strana jednim klikom-pomoć
  
  
  Evo koda koji pokušavam da sredim
Private Sub Adresa_AfterUpdate()
    If Len(Me.Adresa) = 0 Then
        Exit Sub
    Else
        Me.PozivWeb.SetFocus
    End If
End Sub
Private Sub PozivWeb_Click()
    If Len(Me.Adresa) = 0 Then Exit Sub
    If IsConnectedToInternet = True Then
    Else
        Beep
        DoCmd.Close acForm, Me.Form.Name, acSaveYes
        MsgBox "Internet veza je u prekidu", vbCritical, "Upozorenje!"
        Exit Sub
    End If
    wbbWebsite.Navigate URL:=Me.Link
End Sub