hessebou

try to create a separate .html file: here you can play with top, left (those two can also be negative), zoom, width, height. the main thing is zoom, if it's less than 100 your video should be smaller. if this works just point to this html file with autoit. <div style="position:absolute; top:0px; left:0px"> <iframe src="http://netcamw100010.w10/view/index.shtml"­ style="zoom:100%" width=476 height=267 scrolling="no" frameborder="0"> </iframe></div>

what about this? GUICtrlSetFont then it should dont matter what the win7/vista settings are.

works on win7-64 with the change from jfx

hi, i found this. maybe you can implement it. Public Function sGetXPCDKey() Dim bDigitalProductID Dim bProductKey() Dim bKeyChars(24) Dim ilByte Dim nCur Dim sCDKey Dim ilKeyByte Dim ilBit ReDim Preserve bProductKey(14) Set objShell = CreateObject("WScript.Shell") bDigitalProductID = objShell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\Windows NT\CurrentVersion\DigitalProductId") Set objShell = Nothing For ilByte = 52 To 66 bProductKey(ilByte - 52) = bDigitalProductID(ilByte) Next 'Possible characters in the CD Key: bKeyChars(0) = Asc("B") bKeyChars(1) = Asc("C") bKeyChars(2) = Asc("D") bKeyChars(3) = Asc("F") bKeyChars(4) = Asc("G") bKeyChars(5) = Asc("H") bKeyChars(6) = Asc("J") bKeyChars(7) = Asc("K") bKeyChars(8) = Asc("M") bKeyChars(9) = Asc("P") bKeyChars(10) = Asc("Q") bKeyChars(11) = Asc("R") bKeyChars(12) = Asc("T") bKeyChars(13) = Asc("V") bKeyChars(14) = Asc("W") bKeyChars(15) = Asc("X") bKeyChars(16) = Asc("Y") bKeyChars(17) = Asc("2") bKeyChars(18) = Asc("3") bKeyChars(19) = Asc("4") bKeyChars(20) = Asc("6") bKeyChars(21) = Asc("7") bKeyChars(22) = Asc("8") bKeyChars(23) = Asc("9") For ilByte = 24 To 0 Step -1 nCur = 0 For ilKeyByte = 14 To 0 Step -1 'Step through each byte in the Product Key nCur = nCur * 256 Xor bProductKey(ilKeyByte) bProductKey(ilKeyByte) = Int(nCur / 24) nCur = nCur Mod 24 Next sCDKey = Chr(bKeyChars(nCur)) & sCDKey If ilByte Mod 5 = 0 And ilByte <> 0 Then sCDKey = "-" & sCDKey Next sGetXPCDKey = sCDKey End Function Public Function Question() Set objFSO = CreateObject("Scripting.FileSystemObject") Dim Ans Ans = MsgBox("Yes = Write Windows XP Serial key to the C Drive and No = Prompt with Serial key",4) If Ans = vbYes then Set oOutFile = objFSO.CreateTextFile("c:\XP_Serial_Key.txt") oOutFile.WriteLine sGetXPCDKey else wscript.echo sGetXPCDKey End If End Function call Question

Hi, Here I created a script that loads image files, or freely chosen desktop areas (such as the Snippingtool) on a free hosting server and put the URL in the clipboard. A one-click solution which has proven to be very useful here. Some of the GuiControl I have highlighted with help texts (as Mousetooltip), so everything should be understandable. i "Tinkered out" this script from pretty much an even bigger project of me so the code may be dirty or get some superfluous variables. the required fileinstalls I have attached here with. compact0.rar and compact1.rar only contain pictures and texts, the two exe files (IrfanView and curl), I packed separately as compact2.rar , for all that wish to prefer to download from the manufacturer. If there are questions, feel free to ask them http://www.andygo1.de/compact0.rar http://www.andygo1.de/compact1.rar http://www.andygo1.de/compact2.rar LiveSnap-Compact.au3

hello once again, i coded a better solution: this works without timer and without flickering. #include <GUIConstantsEx.au3> Opt('MustDeclareVars', 1) Example() Func Example() Local $Button_1, $Button_2, $msg, $temptip = "" GUICreate("My GUI Button") Opt("GUICoordMode", 2) $Button_2 = GUICtrlCreateButton("Button Test", 0, -1) GUICtrlSetTip($Button_2, "test") GUISetState() While 1 if Stringleft(ClipGet(), 7) = "http://" then if GUICtrlGetState($Button_2) = 144 or $temptip <> clipget() then $temptip = clipget() GUICtrlSetState ( $Button_2, $GUI_ENABLE ) GUICtrlSetTip ( $Button_2, clipget()) endif Else if GUICtrlGetState($Button_2) = 80 then GUICtrlSetState ( $Button_2, $GUI_DISABLE ) GUICtrlSetTip ( $Button_2, "") endif endif $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop EndSelect WEnd EndFunc what do you think about it?

hey cool, i got it now i can go on with some tests setting the mouse-tip in a while-loop works fine without the timer-trick. thank you

hello, please take a look at this example: #include <GUIConstantsEx.au3> Opt('MustDeclareVars', 1) Example() Func Example() Local $Button_1, $Button_2, $msg GUICreate("My GUI Button") Opt("GUICoordMode", 2) $Button_2 = GUICtrlCreateButton("Button Test", 0, -1) GUICtrlSetTip($Button_2, "test") GUISetState() While 1 sleep(20) ;GUICtrlSetTip($Button_2, "in-while") $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop EndSelect WEnd EndFunc if you run this script untouched you will see the control-tip "test" works. if you remove the comment in the while-loop, the control-tip should now be "in-while". but this dont work. what is wrong here?

thanks, your solution also worked for me. never had problems with creating lnk-files, just under vista-64. now all is fine.

at first: sorry for my not perfect english, i am living in germany i have had a similar problem: main-GUI with one IE-embedded object (internet-livestream) one of my gui-buttons opens a second-GUI with a forum-reply-interface. and this only accept key-inputs, but NO backspace. i solved it like this: when switch to the second-GUI, delete the first IE_obj, and tadaaa: also backspace works now on my second ie-obj. if i close the second-GUI, i just had to re-create the first IE-embed. maybe not the cleanest solution but it works for me.

within your script chrW works, but not if i try to fill my html. exact case is: <form action="http://de.sevenload.com/bigbrother/forum/new/post/ NLZu6Uk " method="post" name="auto" accept-charset="UTF-8"><input type="text" name="title" id="fe-title" value=" glühwein " /><textarea name="text" id="fe-text" rows="10" cols="50"></textarea><input type="submit" name="confirm" value="Senden" /></form> if i load this html-code (could be a file on my machine) manually with my browser and click "senden", the word "glühwein" is correctly shown in the sevenload-forum. if i try this script-part here: _IENavigate ($oIE, @TempDir & "\auto.htm") $oForm = _IEFormGetObjByName ($oIE, "auto") $otitle = _IEFormElementGetObjByName ($oForm, "title") $oQuery = _IEFormElementGetObjByName ($oForm, "text") _IEFormElementSetValue ($otitle, "glühwein") _IEFormElementSetValue ($oQuery, "test") _IEFormSubmit ($oForm) the word "glühwein" isnt there, only the first two letters "gl".

hello, if i want to put this to a form: _IEFormElementSetValue ($otitle, "abcdefgüüüüürrrr") for example, the result is "abcdefg" it was cut where the ü starts. what is wrong here?

hi again, i solved it. i wrote a little script which takes a screenshot of the VLC-video and uploads it to a server. with WinActivate("[CLASS]") it dont work so i tried WinActivate("title") and this works.... wihtin the script i interact with irfanview command line and curl.exe works nice

hello, if i watch some http:// streams, i can send a key to the VLC-Gui to create a screenshot for example. but: if i watch dshow:// stream from a wintv-pvr-350 card , i can give focus to the VLC-Gui but it dont react to any sendet keys...... WHY?

works fine, thanks