beste mensen,
Ik heb een probleempje:
Ik ben bezig in wincc om met een button naar internet te gaan en internet dan ook op de voorgrond te laten verschijnen.
ik programmeer alles in vbs, en internet wordt idderdaad opgestart maar blijft op de achtergrond als tabblad onderin windows.
iemand hier oplossing voor?
mijn vbs code is:
Dim MyVar
MyVar = MsgBox ("Weet u zeker dat u naar Datamonitor wilt?", 65, "Wincc")
If MyVar = 1 Then
Dim text
text = MsgBox ("Moment geduld, U gaat zo naar Datamonitor.", 0, "Wincc")
Dim objIExplorer
Set objIExplorer = CreateObject("internetexplorer.application")
objIExplorer.Navigate ("http://www.google.nl/")
objIExplorer.Visible = True
objIExplorer.Top = 0
objIExplorer.Left = 0
objIExplorer.Width = 1280
objIExplorer.Height = 1020
objIExplorer.FullScreen = False
objIExplorer.MenuBar = False
objIExplorer.ToolBar = false
objIExplorer.StatusBar = False
End If
If MyVar = 2 Then
Exit Sub
End If
Alvast bedankt
Tim
Ik heb een probleempje:
Ik ben bezig in wincc om met een button naar internet te gaan en internet dan ook op de voorgrond te laten verschijnen.
ik programmeer alles in vbs, en internet wordt idderdaad opgestart maar blijft op de achtergrond als tabblad onderin windows.
iemand hier oplossing voor?
mijn vbs code is:
Dim MyVar
MyVar = MsgBox ("Weet u zeker dat u naar Datamonitor wilt?", 65, "Wincc")
If MyVar = 1 Then
Dim text
text = MsgBox ("Moment geduld, U gaat zo naar Datamonitor.", 0, "Wincc")
Dim objIExplorer
Set objIExplorer = CreateObject("internetexplorer.application")
objIExplorer.Navigate ("http://www.google.nl/")
objIExplorer.Visible = True
objIExplorer.Top = 0
objIExplorer.Left = 0
objIExplorer.Width = 1280
objIExplorer.Height = 1020
objIExplorer.FullScreen = False
objIExplorer.MenuBar = False
objIExplorer.ToolBar = false
objIExplorer.StatusBar = False
End If
If MyVar = 2 Then
Exit Sub
End If
Alvast bedankt
Tim