Search found 83 matches

by zotune
09 Feb 2017, 10:45
Forum: Ask For Help
Topic: Ping4 - Question
Replies: 12
Views: 2387

Re: Ping4 - IPv4 ping function (2015-07-16)

Thanks, but this port is open and does not return anything

Code: Select all

RemoteIP   := "10.211.114.9"
RemotePort := 6100

for i, v in GetTcpTable()
{
    if (RemoteIP = v.RemoteIP) && (RemotePort = v.RemotePort)
        MsgBox % v.State
}
by zotune
09 Feb 2017, 10:21
Forum: Ask For Help
Topic: Ping4 - Question
Replies: 12
Views: 2387

Re: Ping4 - IPv4 ping function (2015-07-16)

jNizM: I just want to check if a remote TCP port is open. Here's my current (crappy) script: CheckPort(Host,Port) { ; DllCall("AllocConsole") ; WinHide % "ahk_id " DllCall("GetConsoleWindow", "ptr") Loop, Parse, % ComObjCreate("WScript.Shell").Exec("Addons\Software\SysinternalsSuite\psping.exe -i 0 ...
by zotune
09 Feb 2017, 09:51
Forum: Ask For Help
Topic: Ping4 - Question
Replies: 12
Views: 2387

Re: Ping4 - IPv4 ping function (2015-07-16)

Thank you. That would be very useful
by zotune
09 Feb 2017, 09:43
Forum: Ask For Help
Topic: Ping4 - Question
Replies: 12
Views: 2387

Re: Ping4 - IPv4 ping function (2015-07-16)

jNizM: That's great. Thank you. But, how can I pass a remote IP/Host:Port to this and verify if it is open?
by zotune
09 Feb 2017, 08:39
Forum: Ask For Help
Topic: Ping4 - Question
Replies: 12
Views: 2387

Ping4 - Question

Can this script be used to check if a TCP port is open?
by zotune
01 Feb 2017, 08:56
Forum: Ask For Help
Topic: Extract .rar using UnRAR.dll
Replies: 0
Views: 541

Extract .rar using UnRAR.dll

Anyone know how?
https://autohotkey.com/board/topic/2321 ... r-075-090/ does not work for me.

I have 7-zip32.dll working, but don't think it supports .rar (not as good as the GUI version)
by zotune
26 Jan 2017, 16:15
Forum: Ask For Help
Topic: Unable to run ahk in SublimeAutoHotkey
Replies: 2
Views: 631

Re: Unable to run ahk in SublimeAutoHotkey

I'll think about it, would still like a solution to this though. I don't really use debug, just msgbox.
by zotune
26 Jan 2017, 05:31
Forum: Ask For Help
Topic: Unable to run ahk in SublimeAutoHotkey
Replies: 2
Views: 631

Unable to run ahk in SublimeAutoHotkey

https://github.com/ahkscript/SublimeAutoHotkey

Anyone know how to make CTRL+B use Tools, AutoHotkey - Run to run the .ahk file instead of compile?

Appreciate any help.
by zotune
10 Oct 2016, 23:09
Forum: Ask For Help
Topic: Download public file from Google Drive
Replies: 4
Views: 3400

Re: Download public file from Google Drive

Any way to make this work with confirm links? (files over 25 MB which need virus scan)
by zotune
18 May 2016, 00:53
Forum: Ask For Help
Topic: Treeview highlight color
Replies: 10
Views: 2368

Re: Treeview highlight color

just me: Thanks anyway, let me know if you ever get it working. I really like the new Explorer theme compared to the old one. :)
by zotune
16 May 2016, 05:19
Forum: Ask For Help
Topic: Treeview highlight color
Replies: 10
Views: 2368

Re: Treeview highlight color

bish01: Thanks :) Simple example #SingleInstance,Force ;Add GUI items Gui, Add, Text,, Search: Gui, Add, Edit, x+10 gSearch vEdit ;gGOTOLABEL ;vNAMEOFEDIT Gui, Add, TreeView ;Add treeview items P1 := TV_Add("1") P1C1 := TV_Add("2", P1) ; Specify P1 to be this item's parent. P1C1 := TV_Add("3", P1) ;...
by zotune
16 May 2016, 04:53
Forum: Ask For Help
Topic: Treeview highlight color
Replies: 10
Views: 2368

Re: Treeview highlight color

just me: Yes, that works great.

Any chance you can update it?
Also, can I can send you a donation?
by zotune
16 May 2016, 04:05
Forum: Ask For Help
Topic: Treeview highlight color
Replies: 10
Views: 2368

Re: Treeview highlight color

just me: Thanks so much. Your color scripts have made it possible for me to create modern GUI's in AHK.
http://i.imgur.com/gG3zaUv.png

The only thing left now, is if there's any way to use modern > ^ arrows instead of +/- in treeview, like Windows 10 does.
http://i.imgur.com/ZPepUBB.png
by zotune
16 May 2016, 02:02
Forum: Ask For Help
Topic: Treeview highlight color
Replies: 10
Views: 2368

Treeview highlight color

Is there a way to set Treeview highlight color?
by zotune
09 Oct 2015, 04:59
Forum: Ask For Help
Topic: Possible to reduce Excel command time?
Replies: 18
Views: 3691

Re: Possible to reduce Excel command time?

Yes, thank you so much. That works wonderfully.
However, it's just as slow as using it without union. If not slower. Because of all the Range function calls.

Edit:
It's even slower, 2 minutes and going, I've hardly done any coloring.
by zotune
08 Oct 2015, 10:37
Forum: Ask For Help
Topic: Possible to reduce Excel command time?
Replies: 18
Views: 3691

Re: Possible to reduce Excel command time?

I don't know how to combine R1, R2 into one line based on my findings. Higher in the code I have something like if (bla bla) { Range := xl.Range["A" Row] "," } Range:=Trim(Range,",") xl.Union[Range].Font.Bold := True this gives an error if it's not on one line then I won't see any time savings, and ...
by zotune
08 Oct 2015, 09:37
Forum: Ask For Help
Topic: Possible to reduce Excel command time?
Replies: 18
Views: 3691

Re: Possible to reduce Excel command time?

Code: Select all

r1:=xl.Range("F6")
r2:=xl.Range("G7")
combine:=r1 , r2
xl.Union[combine].Font.Bold := True
Thanks. How can I pass both R1 and R2 in from a string? I can't type them manually into xl.Union[R1,R2], that defeats the whole purpose.
by zotune
08 Oct 2015, 08:31
Forum: Ask For Help
Topic: Possible to reduce Excel command time?
Replies: 18
Views: 3691

Re: Possible to reduce Excel command time?

Okay, thanks. Trying to see if I understand unions. r1:=xl.ActiveSheet.Range("F6:F6").Select r2:=xl.ActiveSheet.Range("F7:F7").Select myMultipleRange := xl.Union(r1, r2) myMultipleRange.Font.Bold := True Doesn't work atm. Edit: r1:=xl.Range("F6:F6") r2:=xl.Range("F7:F7") xl.Union(r1, r2).Font.Bold :...
by zotune
08 Oct 2015, 07:57
Forum: Ask For Help
Topic: Possible to reduce Excel command time?
Replies: 18
Views: 3691

Re: Possible to reduce Excel command time?

Appreciate the help. Although is it possible to do multiple ranges like in VBA?
Then I could change the items with the same color simultaneously, that could save a bunch of time:
Range("A1:A2,B3:C4").Value = 10

Go to advanced search