
hijolin
Members-
Posts
16 -
Joined
-
Last visited
Everything posted by hijolin
-
Help!
-
But still error
-
open new windows error. http://support.microsoft.com/kb/184876 #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <IE.au3> _IEErrorHandlerRegister (" ie8 ") $oIE = _IECreateEmbedded () $EventObject=ObjEvent($oIE,"IEEvent_","DWebBrowserEvents2") if @error then Msgbox(0,"AutoIt COM Test", _ "ObjEvent: Can't use event interface 'DWebBrowserEvents'. Error code: " & hex(@error,8)) exit endif $GUI = GUICreate("",500,500) $GUIActiveX = GUICtrlCreateObj($oIE,0,0,500,500) _IENavigate ($oIE, "http://www.google.com",0) GUISetState() While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Func IEEvent_NewWindow2($ppDisp,$Cancel) ; Error <---- ; http://support.microsoft.com/kb/184876 $Cancel = True EndFunc
-
Anyone know how to do this?
-
Clear Internet Explorer History
hijolin replied to Harrie38's topic in AutoIt General Help and Support
help -
how turned off desk Auto Arrange
hijolin replied to hijolin's topic in AutoIt General Help and Support
3q -
how turned off desk Auto Arrange
hijolin replied to hijolin's topic in AutoIt General Help and Support
help me -
how turn off desk Auto Arrange?? #include <A3LWinAPI.au3> $hList = ControlGetHandle("Program Manager","","SysListView321") $dwStyle = _API_GetWindowLong($hList, $GWL_STYLE ) $dwStyle = $dwStyle & " ~LVS_AUTOARRANGE" _API_SetWindowLong($hList, $GWL_STYLE , $dwStyle) but no turn off desk Auto Arrange help me
-
HOw to make this C++ script work in AutoIt
hijolin posted a topic in AutoIt General Help and Support
#define WIN32_LEAN_AND_MEAN #include <windows.h> #include <stdlib.h> #include <math.h> #include "commctrl.h" #define TIMER_ELAPSE 50 #define ICON_HFWIDTH 35 #define ICON_HFHEIGHT 35 #define MAX_LEN 65 // get currrent list view HWND GetLstView(POINT * pt /*= NULL*/) { const char * strLstVClass = "SysListView32"; char ClassName[MAX_LEN]; if(NULL == pt) return NULL; HWND hDeskView = WindowFromPoint(*pt); GetClassName(hDeskView, ClassName, 64); if(0 == strcmp(ClassName,strLstVClass)) return hDeskView; return NULL; } // get icon's position void GetItemPos(HWND hLstView, int i, POINT * ppt) { DWORD dwProcessId; GetWindowThreadProcessId(hLstView,&dwProcessId); HANDLE hProcess = OpenProcess(PROCESS_VM_READ | PROCESS_VM_OPERATION, FALSE, dwProcessId); PVOID vpt = VirtualAllocEx(hProcess, NULL, sizeof(POINT), MEM_COMMIT, PAGE_READWRITE); ListView_GetItemPosition(hLstView,i,vpt); ReadProcessMemory(hProcess, vpt, ppt, sizeof(POINT), NULL); VirtualFreeEx(hProcess, vpt, NULL, MEM_RELEASE); CloseHandle(hProcess); } // icons esacpe void Escape(int iRadius) { int i, iCount; POINT ptCur; RECT rctLst, rctUpdate; HWND hLstView; //get listview GetCursorPos(&ptCur); if(NULL == (hLstView = GetLstView(&ptCur))) return; //show my name, pls remain it GetClientRect(hLstView, &rctLst); rctUpdate = rctLst; rctUpdate.left = rctLst.right - 130; rctUpdate.top = rctLst.bottom - 40; InvalidateRect(hLstView, &rctUpdate,true); HDC hdc = GetDC(hLstView); COLORREF crPre = SetTextColor(hdc,RGB(0,255,0)); int iBk = SetBkMode(hdc,TRANSPARENT); TextOut(hdc, rctLst.right - 120, rctLst.bottom - 30, "Caohai 12/31/04", 15); SetTextColor(hdc,crPre); SetBkMode(hdc, iBk); ReleaseDC(hLstView,hdc); //set listview to icon style DWORD dwStyle = GetWindowLong(hLstView,GWL_STYLE); dwStyle = dwStyle & ~LVS_AUTOARRANGE & ~LVS_SMALLICON & ~LVS_LIST & ~LVS_REPORT; SetWindowLong(hLstView, GWL_STYLE, dwStyle); //escape iCount = ListView_GetItemCount(hLstView); ScreenToClient(hLstView,&ptCur); for(i=0; i<iCount; i++) { POINT ptIcon, ptIC; GetItemPos(hLstView,i,&ptIcon); ptIC.x = ptIcon.x + ICON_HFWIDTH; ptIC.y = ptIcon.y + ICON_HFHEIGHT; float fDistance = sqrt((float)(ptIC.y - ptCur.y) * (ptIC.y - ptCur.y) + (ptIC.x - ptCur.x) * (ptIC.x - ptCur.x)); if(fDistance < (float)iRadius && (ptIC.x != ptCur.x) && ((fDistance > 0.0) ||(fDistance < 0.0))) {//move ptIcon.x = ptCur.x + (LONG)((iRadius * (ptIC.x - ptCur.x)) / fDistance) - ICON_HFWIDTH; ptIcon.y = ptCur.y + (LONG)((iRadius * (ptIC.y - ptCur.y)) / fDistance) - ICON_HFHEIGHT; if(ptIcon.x < 2 * ICON_HFWIDTH || ptIcon.x > rctLst.right - 2 * ICON_HFWIDTH) { srand((int)ptIcon.x * i); ptIcon.x = (rand() % rctLst.right); } if(ptIcon.y < 2 * ICON_HFHEIGHT || ptIcon.y > rctLst.bottom - 2 * ICON_HFHEIGHT) { srand((int)ptIcon.y * i); ptIcon.y = (rand() % rctLst.bottom); } ListView_SetItemPosition(hLstView, i, ptIcon.x, ptIcon.y); } } } // win main int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPTSTR lpCmdLine, int nCmdShow) { MSG msg; if(hPrevInstance != NULL) return FALSE; SetTimer(NULL,1,TIMER_ELAPSE,NULL); while(GetMessage(&msg, NULL, WM_TIMER, WM_TIMER)) Escape(100); KillTimer(NULL,1); return (int) msg.wParam; } only make this C++ script work in AutoIt //set listview to icon style DWORD dwStyle = GetWindowLong(hLstView,GWL_STYLE); dwStyle = dwStyle & ~LVS_AUTOARRANGE & ~LVS_SMALLICON & ~LVS_LIST & ~LVS_REPORT; SetWindowLong(hLstView, GWL_STYLE, dwStyle); 我不懂英文啊。。只是想知道怎么取消桌面图标的自动排列 -
del Temporary Internet Files all file
hijolin replied to hijolin's topic in AutoIt General Help and Support
That's not allowed -
del Temporary Internet Files all file
hijolin replied to hijolin's topic in AutoIt General Help and Support
help me? -
del Temporary Internet Files all file
hijolin replied to hijolin's topic in AutoIt General Help and Support
Filedelete command or dirRemove no del -
how del C:\Documents and Settings\Administrator\Local Settings\Temporary Internet Files\*.* ?? 怎么删除IE临时文件啊
-
How can I use the UDF to click a link?
hijolin replied to chenxu's topic in AutoIt General Help and Support
晕啊。。还有懂中文的啊! 想问个问题都不知道怎么问啊 -
HOw to make this VBS script work in AutoIt
hijolin posted a topic in AutoIt General Help and Support
host=inputbox("IP:") port=inputbox("port:") Set socket=WScript.CreateObject("MSWinsock.Winsock","winsock_") socket.Protocol=0 socket.RemotePort=port socket.RemoteHost=host socket.connect for a=1 to 30 WScript.sleep 10 next msgbox("port "&socket.remoteport&" close!") socket.close WScript.quit Sub winsock_connect() msgbox("port "&socket.remoteport&" open!") socket.close WScript.quit end sub