silvanr

Some styles cannot be changed dynamically, check MSDN documentation. $CBS_UPPERCASE combo style is one example. Is $CBS_DROPDOWN also one?

How can I delete the style from a control to set a new one? I would like to change the style by pressing a button. GUICtrlSetStyle only add a Style, but I can't change or delete the style. Style 1: $CBS_DROPDOWN Style 2: Non $CBS_DROPDOWN It's possible? If StringInStr($asParm[$i+1][1], "|") Then GUICtrlSetStyle($ParmValue[$i], $CBS_DROPDOWN) Else GUICtrlSetStyle($ParmValue[$i], NON $CBS_DROPDOWN) ; delete this style (like GUICtrlCreateInput) EndIf Info: I can't use GUICtrlCreateInput or GUICtrlCreateEdit for this script. thx

I found it out. Thanks. It's o.k.

sry, I meant href. Here the code: #include <IE.au3> $oIE = _IE_Example () $oInputs = _IETagNameGetCollection ($oIE, "a") For $oInput In $oInputs MsgBox(0, "URL (href)", $oInput.href) Next Thx

how can I read the URL and the name of an IE object? The name can I select in such a way: #include <IE.au3> $oIE = _IE_Example () $oInputs = _IETagNameGetCollection ($oIE, "a") For $oInput In $oInputs MsgBox(0, "Name:", $oInput.innerText) Next and the url?

Use this function: _IEAction ($oSubmit, "click") That works :-) For example: #include <IE.au3> ; Create browser with desired content $oIE = _IECreate() $sHTML = "" $sHTML &= "<FORM action='java script:alert(""FormSubmitted"");'>" $sHTML &= "<INPUT type=submit value=submit name=submit> </FORM>" _IEBodyWriteHTML($oIE, $sHTML) ; Get form reference $oForm = _IEFormGetCollection ($oIE, 0) $oSubmit = _IEFormElementGetCollection ($oForm, 0) ; submit action is ignored ;~ _IEFormSubmit($oForm) _IEAction ($oSubmit, "click") _IELoadWait ($oIE)

Many web pages use submit as name. Is there an alternative possibility?

If a button name submit, then I can't press it with _IEFormSubmit. For example: #include <IE.au3> $oIE = _IECreate("http://www.redaware.ch/shop/test.php") $oForm = _IEFormGetCollection ($oIE, 0) ;Button Click $x = _IEFormSubmit($oForm) ConsoleWrite('@@ Debug(7) : $x = ' & $x & @lf & '>Error code: ' & @error & @lf) ;### Debug Console Console output: $x = -1 What wrong? Is that a bug?

I know that all of the things that starrt with xl are Enum constansts. thx I successfully made it :-) ... $MyObject.Sheets("Tabelle1").Select $myObject.Charts.add WITH $MyObject.ActiveChart .ChartType = 51;xlColumnClustered .SetSourceData($MyObject.Sheets("Tabelle2").Range("B1:B5")) .SeriesCollection(1).XValues = "=Tabelle2!Z1S1:Z5S1" .ApplyDataLabels(2, False);Wert oben anzeigen .HasLegend = False .Location (2, "Tabelle1"); Wo soll die Charts eingefügt werden ENDWITH $myObject.ActiveSheet.Shapes("Diagramm 1").Left = 0 $myObject.ActiveSheet.Shapes("Diagramm 1").Top = 0 ...

is it not possible?

I would like to write a Script that this diagram creates automatically. This is a VBA Macro: Sub char() Charts.Add ActiveChart.ChartType = xlColumnClustered ActiveChart.SetSourceData Source:=Sheets("Tabelle2").Range("B1:B5"), PlotBy _ :=xlColumns ActiveChart.SeriesCollection(1).XValues = "=Tabelle2!R1C1:R5C1" ActiveChart.Location Where:=xlLocationAsObject, Name:="Tabelle1" With ActiveChart .HasTitle = False .Axes(xlCategory, xlPrimary).HasTitle = False .Axes(xlValue, xlPrimary).HasTitle = False End With ActiveChart.HasLegend = False ActiveChart.ApplyDataLabels Type:=xlDataLabelsShowValue, LegendKey:=False End Sub I have already this in AutoIt: ;Create obj $MyObject = ObjCreate("Excel.Application"); Create an Excel Object if @error then Msgbox (0,"Excel Error:","Error creating Excel object!") exit(1) endif if Not IsObj($MyObject) then Msgbox (16,"Excel Error:","Excel obj wurde nicht richtig erstellt") exit endif $MyObject.Visible = 1 $MyObject.workbooks.add $MyObject.Sheets("Tabelle2").Select $myObject.Charts.add WITH $MyObject.ActiveChart .ChartType = 51;xlColumnClustered ENDWITH $MyObject = 0 How can I translate this: ActiveChart.SetSourceData Source:=Sheets("Tabelle2").Range("B1:B5"), PlotBy :=xlColumns I don't know, what I with ",:" can make. Can someone help me? thx

Func _adddt($dbname, $tblname, $fldname, $dt) $adoCon = ObjCreate ("ADODB.Connection") $adoCon.Open ("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & $dbname) $adoRs = ObjCreate ("ADODB.Recordset") $adoRS.CursorType = 2 $adoRS.LockType = 3 $adoRS.Open ("SELECT * FROM " & $tblname, $adoCon) $adoRS.AddNew $adoRS.Fields ($fldname).Value = $dt $adoRS.Update $adoRS.Close $adoCon.Close EndFunc ;==>_adddt I write this Function. It's possible to overwrite Date? how? I would like e.g. write directly into the 5. Line thx

Its possible to put date in the AccessDb? like these: _putdate($dbname,$fldname, $value)

thx

is it to be used possible a mouse button as Hotkey? HotKeySet("MouseButtonMiddle", "MyFunc")

_BrowseURL("www.autoitscript.com") Func _BrowseURL($url="") $x = RegRead("HKEY_CLASSES_ROOT\http\shell\open\command", "") Run($x & " " & $url) EndFunc (tested only with: Windows 2k German)

What is Autoit w/COM?

No ideas?

$err = DllCall("Winmm", "int", "waveOutGetVolume", "int", 0, "long", $vol) Return: $vol = "" ;empty string :-( $err[0] = 11 $err[1] = 0 $err[2] = 0 But I would for $vol a value (0 - 100)

I don't understand This. Sorry. Can you give me an example please? Thanks

I can't use this Function $vol = DllCall("Winmm", "int", "waveOutGetVolume", "long", 0) What is the param? Where is the mistake? Infos: http://www.mentalis.org/apilist/waveOutGetVolume.shtml Thanks for Help. Greetz

Hi You can only run (EXE, BAT, COM, or PIF), but not .msc Try that: $File = @SystemDir & "\services.msc" Run(@SystemDir & "\mmc.exe " & $File)

hi I have a question. Its possible to send a text in a input or editbox (to html)? How? For example: <p>Nick:<br> <input name="nick" type="text"> </p> <p>Password:<br> <input name="password" type="password> </p> thx ------------------------------------------------------------------------------------------- uuups :"> ...., Not: "It's possible" I meant: "Is It possible?"

ooh, Sorry. I could't test it, but now is all correctly. Thx

Thanks, but my script is for WinNT4, Win2k AND WinXP ???