如何透過JSL模擬滑鼠操作？比如我想透過JSL模擬滑鼠操作：
1.模擬移動遊標：將遊標移到指定位置：例如x=180；Y=380；
2. 左鍵單擊：左鍵單擊並單擊“開始”按鈕。
謝謝！
自動化和腳本編寫Re: 如何透過JSL模擬滑鼠操作？謝謝克雷格！正如您所說，“在分割完成之前阻止主線程上的任何其他活動”。
我使用VBA來控制Q語言和JMP之間的協作。
現在只需使用 JMP 即可輕鬆完成。
謝謝！Re: 如何透過JSL模擬滑鼠操作？我認為 JMP 在主執行緒上運行 GO 按鈕，從而阻止主執行緒上的任何其他活動，直到分割完成。能分享一個例子嗎？
Re: 如何透過JSL模擬滑鼠操作？謝謝傑夫！
我的目標是等到決策樹操作完成後再執行以下腳本。
JMP 是否有對應的功能？
Re: 如何透過JSL模擬滑鼠操作？我不知道如何取得CPU使用率。 據我所知，JMP 沒有任何工具可以直接執行此操作。
但是，您不需要模擬點擊 Go 按鈕，因為 JSL 已經有針對 Partition 平台的 Go 訊息。
Re: 如何透過JSL模擬滑鼠操作？Re: 如何透過JSL模擬滑鼠操作？具體來說，一個路徑的所有JMP檔案都會被劃分為決策樹，每個檔案決策樹的運行時間是不同的。假設時間在30到60分鐘之間。
因此，JSL應該設計為點選「Go」按鈕30分鐘，每5分鐘測試一次CPU利用率。
如果CPU利用率低於5%，則執行d0<否則，循環應持續5分鐘，然後測試CPU利用率，直到決策樹分割完成。
d0 = Current Data Table();
dir = "c:\1\";
Fs = Files In Directory( dir );
For( d = 1, d <= N Items( fs ), d++,
dt = Open( dir || fs[d] );
p = dt << Partition(
Y( :Y ),
X( :X1, :X2 ),
Validation Portion( 0.25 ),
Informative Missing( 1 )
);
(Report( p ) << xpath( "//ButtonBox[@title = 'Go']" )) << click;
For( j = 1, j <= 6, j++,
cpu = ……;
If( cpu < 0.05,
d0 << Run Script( "B" ),
Wait( 300 )//Does this wait affect the decision tree?
);
);
);
Re: 如何透過JSL模擬滑鼠操作？繼續問更多不尋常的問題：我現在正在使用Excel的VBA透過JMP透過監控CPU利用率和控制滑鼠移動和點擊來實現不同檔案的各種循環操作。 我的主要目標是透過點擊「go」按鈕來獲得決策樹的 Split 效果，而不是透過 JSL 的「Split Best(1000)」。 我現在想在不使用 VBA 的情況下執行此操作，而是使用 JSL。 現在我需要實作 JSL 來取得 CPU 使用率。Re: 如何透過JSL模擬滑鼠操作？謝謝克雷格！
原來的 JMP 可以透過這種方式實現。 我學到了新技能。Re: 如何透過JSL模擬滑鼠操作？您可以像這樣點擊按鈕：
dt=open("$sample_data/big class.jmp");
p = dt<<PARTITION></PARTITION>為什麼要移動滑鼠遊標？ 除了您可能想要單擊的按鈕之外，還有一些東西，但可能有比編寫移動滑鼠的程式碼更好的自動化方法。 此外，人們討厭滑鼠自行移動。
Re: 如何透過JSL模擬滑鼠操作？程式設計語言
Public Declare PtrSafe Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long<BR />Public Declare PtrSafe Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long<BR />Public Const MouseEventf_LeftDown = &H2
Public Const MouseEventf_LeftUp = &H4
Type POINTAPI
x As Long
y As Long
End Type
Private Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Sub click()
SetCursorPos 180, 380
For i = 1 To 1
mouse_event MouseEventf_LeftDown, 0, 0, 0, 0
mouse_event MouseEventf_LeftUp, 0, 0, 0, 0
Next
End Sub
