Jump to content

Xenophane

Members
  • Posts

    4
  • Joined

  • Last visited

Xenophane's Achievements

Seeker

Seeker (1/7)

0

Reputation

  1. Ok I will try to explain it a bit better... Here is the code that I have written. #Include <Constants.au3> #NoTrayIcon Opt("TrayMenuMode",1) ; Default tray menu items (Script Paused/Exit) will not be shown. $Console = TrayCreateMenu("Console Connect") $Regular = TrayCreateMenu("Regular Connect") $clinton = TrayCreateItem("Clinton", $Console) $mail = TrayCreateItem("Mail", $Console) $3BMail = TrayCreateItem("3B Mail", $Console) $anders = TrayCreateItem("Anders (Print)", $Console) $dc = TrayCreateItem("DC (Domain Controller)", $Console) $kornelius = TrayCreateItem("Kornelius (DC)", $Console) $blisand = TrayCreateItem("Blisand (DC)", $Console) $Triosrv = TrayCreateItem("Trio Server", $Console) $Hoejben = TrayCreateItem("Højben (Web Server)", $Console) $Gearloes = TrayCreateItem("Gearløs (Unix Flet)", $Console) $Raptus = TrayCreateItem("Raptus (Firewall)", $Console) $clinton1 = TrayCreateItem("Clinton", $Regular) $mail1 = TrayCreateItem("Mail", $Regular) $3BMail1 = TrayCreateItem("3B Mail", $Regular) $anders1 = TrayCreateItem("Anders (Print)", $Regular) $dc1 = TrayCreateItem("DC (Domain Controller)", $Regular) $kornelius1 = TrayCreateItem("Kornelius (DC)", $Regular) $blisand1 = TrayCreateItem("Blisand (DC)", $Regular) $Triosrv1 = TrayCreateItem("Trio Server", $Regular) $Hoejben1 = TrayCreateItem("Højben (Web Server)", $Regular) $Gearloes1 = TrayCreateItem("Gearløs (Unix Flet)", $Regular) $Raptus1 = TrayCreateItem("Raptus (Firewall)", $Regular) TrayCreateItem("") $aboutitem = TrayCreateItem("About") TrayCreateItem("") $exititem = TrayCreateItem("Exit") TraySetState() While 1 $msg = TrayGetMsg() Select Case $msg = 0 ContinueLoop Case $msg = $clinton Run("mstsc -v:Clinton /F -console") Case $msg = $mail Run("mstsc -v:Mail /F -console") Case $msg = $3BMail Run("mstsc -v:3bmail /F -console") Case $msg = $anders Run("mstsc -v:anders /F -console") Case $msg = $dc Run("mstsc -v:dc /F -console") Case $msg = $kornelius Run("mstsc -v:kornelius /F -console") Case $msg = $blisand Run("mstsc -v:Blisand /F -console") Case $msg = $Triosrv Run("mstsc -v:triosrv /F -console") Case $msg = $Hoejben Run("mstsc -v:gearloes /F -console") Case $msg = $Gearloes Run("mstsc -v:gearloes /F -console") Case $msg = $Raptus Run("mstsc -v:raptus /F -console") ;------------------------------------------------------------------------------------------------- Case $msg = $clinton1 Run("mstsc -v:Clinton ") Case $msg = $mail1 Run("mstsc -v:Mail ") Case $msg = $3BMail1 Run("mstsc -v:3bmail ") Case $msg = $anders1 Run("mstsc -v:anders ") Case $msg = $dc1 Run("mstsc -v:dc ") Case $msg = $kornelius1 Run("mstsc -v:kornelius ") Case $msg = $blisand1 Run("mstsc -v:Blisand ") Case $msg = $Triosrv1 Run("mstsc -v:triosrv ") Case $msg = $Hoejben1 Run("mstsc -v:hoejben ") Case $msg = $Gearloes1 Run("mstsc -v:Gearloes ") Case $msg = $Raptus1 Run("mstsc -v:Raptus ") Case $msg = $aboutitem Msgbox(64,"about:","Tool by Claus T. Nielsen") Case $msg = $exititem ExitLoop EndSelect WEnd Exit It created a menu point for each server I can connect to, for both a console connection and a regular connection. But what I would really like to do is create the menu, from a text file or something else, so I do not have to go and change the sourcecode, and recompile it if I need a new server added. Hope this makes more sense...
  2. I have created a small Tray application (with the new Beta) with some hardcoded TrayCreateItems that starts a MSTSC connection to several of our servers. But this is not very pratical since I have to hardcode all serves. Is there a way to do this on the fly i.e read an .ini file and create the "Tray Menu" accordingly ?
  3. There is very nice online documentation at http://www.autoitscript.com/autoit3/docs/
  4. I have 3 rookie question that I have been trying to solve, I have spent hours reading in the forum, but have not been able to find a solution Q1: I have made a small application that sets up Netmeeting on a remote location, it then dials up my PC, and shares it desktop, I send a "Ctrl-s" for sharing, but in order for it to automatically share the users desktop, I am sending a combination of {TAB} and {Enter} to press the buttons on the screen. It works 8 out of 10 times. I would like to activate "Desktop sharing" directly, if I use AU Info, I get that the options are in a listbox called "Listbox1", how do I mark/activate 1 line that listbox ? Q2+Q3 We have a customized application for a public housing system we use, and I have tried to automate a reoccuring task with AutoIT. Currently I have had to move the mouse to a specific location and, and then "click" there.. But that gives me problems when the program is run on another computer, with a different resolution. So I would like to access the buttons directly. Here is what the Access database looks like. Access Database image I am trying to click the "1. Hent tekstfilnavn" button, but when I use AU info, I cannot get any specific info on the button, only the "area" where all 3 buttons are located. How do I press the specific buttons ?? Last but not least, I would like to do a check on the last textbox, when that text changes to "slut" (Means end in Danish) it should close Access Hope that the above rambling gives you an idea of what it is a am asking
×
×
  • Create New...