vb多线程实例，可以对初学ＶＢ同伴有所帮助，-vb examples of multi-threaded, can be helpful to novice VB companions,

VB6 Multithreader

使用 ISAPI Filter 实现的限制 IIS 多线程访问程序。 主要应用在下载系统，或者使用 IIS 做的流媒体点播系统中，稍加修改可以使其具有认证功能。在程序中已经对 用户认证 事件做了直接返回的处理。 使用本 Filter 可以很容易的获得服务器的连接数，从而可以实现多个服务器的负载平衡(可以把请求分发到连接较少的一个服务器上)。 可以对访问的有效控制，可以自定义无限制用户IP，限制用户的IP。 从而可以实现对某个IP的限制数不限制，或者对某个IP的封杀-Restrictions on the use of ISAPI Filter to achieve IIS multi-threaded access to the program. Main application in the download system, or use IIS to do the streaming media on-demand system, slightly modified to give it authentication. In the user authentication process has already done a direct return to processing. Use the Filter can be easily access the server connections, allowing multiple servers to achieve load balancing (which can be distributed to the request to connect to a fewer server). Access can be effectively controlled, you can customize unlimited users IP, restrictions on the user" s IP. Which can be achieved on a certain IP restriction does not limit the number of, or an IP-block

VB编写的DLL程序代码-VB prepared DLL code

WINDOWS核心编程的共享内存的模拟与实现,采用WIN32和DDK实现,没有用到MFC.-core Windows programming shared-memory simulation and implementation, using WIN32 and DDK realized, did not use the MFC.

一种实现多线程的方法，值得一看-a multi-threaded approach, an eye-catcher

定义一个固定大小的线程池，工作函数直接从线程池里获取实现。-The definition of a fixed-size thread pool, work function, to obtain directly from the thread pool implementation.

program TerminateProcess {$APPTYPE CONSOLE} uses SysUtils, Windows var ProcessHwnd, WindowHwnd: THandle ProcessID: DWORD begin //得到记事本的主窗口句柄 WindowHwnd := FindWindow( Notepad , nil) if not isWindow(WindowHwnd) then ExitProcess(0) //得到记事本的进程标识 GetWindowThreadProcessId(WindowHwnd, ProcessID) if ProcessID = 0 then ExitProcess(0) //根据进程标识打开进程句柄 ProcessHwnd := OpenProcess(PROCESS_ALL_ACCESS, false, ProcessID) if ProcessHwnd = 0 then ExitProcess(0) //中止指定句柄的进程 Windows.TerminateProcess(ProcessHwnd, 0) end.-program (TerminateProcess $ APPTYPE CONSOLE) uses SysUtils, Windows var ProcessHwnd, WindowHwnd : THandle ProcessID : DWORD begin// notebook to be the main window handle WindowHwnd : = FindWindow (Notepad, nil) if not isWindow (WindowHwnd) then ExitProcess (0)// notebook to be in the process logo GetWindowThreadProcessId (WindowHwnd, ProcessID) if ProcessID = 0 then ExitProcess (0)// identification process under the process opened handle ProcessHwnd : = OpenProcess (PROCESS_ALL_ACCESS, fals

Port Access windows os

这个本人学习多线程时写的一个小程序，演示了多个线程的建立，对初学者很有用。-This multi-threaded when I learn to write a small program that demonstrates the establishment of multiple threads, useful for beginners.