pcjunki Posted October 15, 2014 Share Posted October 15, 2014 what is the easiest way to embed 8 links into one gui? I have 8 ip cameras, and when I reboot the server, I still need to watch the cameras, and I do this on the server app any guidance would be awesome, just a gui that launches, and shows my cameras in 4 columns 2 rows hope this makes sense Link to comment Share on other sites More sharing options...
Moderators JLogan3o13 Posted October 15, 2014 Moderators Share Posted October 15, 2014 I use a similar script for my IP camera network at home. I'm at the office at the moment, but something like this should get you started: #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <IE.au3> #include <Misc.au3> Local $oIE1 = _IECreateEmbedded() Local $oIE2 = _IECreateEmbedded() $myGUI = GUICreate("Deal A Day Sites", 1000, 500, Default, Default, $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS + $WS_CLIPCHILDREN) $pic1 = GUICtrlCreateObj($oIE1, 10, 10, 400, 400) $pic2 = GUICtrlCreateObj($oIE2, 500, 10, 400, 400) _IENavigate($oIE1, "http://www.google.com") _IENavigate($oIE2, "http://www.yahoo.com") While 1 Local $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE Exit EndSelect WEnd pcjunki 1 "Profanity is the last vestige of the feeble mind. For the man who cannot express himself forcibly through intellect must do so through shock and awe" - Spencer W. Kimball How to get your question answered on this forum! Link to comment Share on other sites More sharing options...
pcjunki Posted October 15, 2014 Author Share Posted October 15, 2014 awesome! just what I'm looking for! thanks Link to comment Share on other sites More sharing options...
Moderators JLogan3o13 Posted October 15, 2014 Moderators Share Posted October 15, 2014 Just as an FYI if you choose to go this route and plan to copy and paste inside the embedded objects, have a look at this thread. "Profanity is the last vestige of the feeble mind. For the man who cannot express himself forcibly through intellect must do so through shock and awe" - Spencer W. Kimball How to get your question answered on this forum! Link to comment Share on other sites More sharing options...
pcjunki Posted October 16, 2014 Author Share Posted October 16, 2014 I have it down now, now I just want to tweak it some more. I have the 8 cameras showings just perfect! now I want to add a button that I can click on, and it launches ie to that ip address where do I put in this code? case $button1 run("C:\Program Files\Internet Explorer\iexplore.exe", "192.168.20.1") this is what I have expandcollapse popup#include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <IE.au3> #include <Misc.au3> Local $oIE1 = _IECreateEmbedded() Local $oIE2 = _IECreateEmbedded() Local $oIE3 = _IECreateEmbedded() Local $oIE4 = _IECreateEmbedded() Local $oIE5 = _IECreateEmbedded() Local $oIE6 = _IECreateEmbedded() Local $oIE7 = _IECreateEmbedded() Local $oIE8 = _IECreateEmbedded() $myGUI = GUICreate("IP CAMERAS", 1281,941, Default, Default, $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS + $WS_CLIPCHILDREN) WinSetState("IP CAMERAS", "", @SW_MAXIMIZE ) $pic1 = GUICtrlCreateObj($oIE1, 0, 10, 310, 310) $pic2 = GUICtrlCreateObj($oIE2, 320, 10, 310, 310) $pic3 = GUICtrlCreateObj($oIE3, 640, 10, 310, 310) $pic4 = GUICtrlCreateObj($oIE4, 960, 10, 310, 310) $pic5 = GUICtrlCreateObj($oIE5, 0, 400, 310, 310) $pic6 = GUICtrlCreateObj($oIE6, 320, 400, 310, 310) $pic7 = GUICtrlCreateObj($oIE7, 640, 400, 310, 310) $pic8 = GUICtrlCreateObj($oIE8, 960, 400, 310, 310) $Button1 = GUICtrlCreateButton("192.168.20.1", 0, 320, 97, 65) ;~ _IENavigate($oIE1, "http://192.168.20.1/liveview/viewer?lv_winid=ACYJYV3-0&lv_wincnt=1&stream_id=0") _IENavigate($oIE2, "http://192.168.20.2/liveview/viewer?lv_winid=ACYJYV3-0&lv_wincnt=1&stream_id=0") _IENavigate($oIE3, "http://192.168.20.3/liveview/viewer?lv_winid=ACYJYV3-0&lv_wincnt=1&stream_id=0") _IENavigate($oIE4, "http://192.168.20.4/liveview/viewer?lv_winid=ACYJYV3-0&lv_wincnt=1&stream_id=0") _IENavigate($oIE5, "http://192.168.20.5/liveview/viewer?lv_winid=ACYJYV3-0&lv_wincnt=1&stream_id=0") _IENavigate($oIE6, "http://192.168.20.6/liveview/viewer?lv_winid=ACYJYV3-0&lv_wincnt=1&stream_id=0") _IENavigate($oIE7, "http://192.168.20.7/liveview/viewer?lv_winid=ACYJYV3-0&lv_wincnt=1&stream_id=0") _IENavigate($oIE8, "http://192.168.20.8/liveview/viewer?lv_winid=ACYJYV3-0&lv_wincnt=1&stream_id=0") While 1 Local $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE Exit EndSelect WEnd Link to comment Share on other sites More sharing options...
Valuater Posted October 16, 2014 Share Posted October 16, 2014 (edited) try this .. NOT TESTED... While 1 Local $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE Exit case $msg = $button1 _IECreate("192.168.20.1") ;run("C:\Program Files\Internet Explorer\iexplore.exe", "192.168.20.1") EndSelect WEnd Edited October 16, 2014 by Valuater Link to comment Share on other sites More sharing options...
pcjunki Posted October 16, 2014 Author Share Posted October 16, 2014 that worked, thanks! Link to comment Share on other sites More sharing options...
Valuater Posted October 16, 2014 Share Posted October 16, 2014 that worked, thanks! Welcome!! 8) Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now