- 博客(37)
- 收藏
- 关注
RSS订阅原创 各种数据包头
typedef struct _ARPHeader // 28字节的ARP头 { USHORT hrd; // 硬件地址空间，以太网中为ARPHRD_ETHER USHORT eth_type; // 以太网类型，ETHERTYPE_IP ？？ UCHAR maclen; // MAC地址的长度，为6 UCHAR iplen; // IP地址的长度，为4 USH
2008-05-28 22:11:00
1166
原创 大规模C面试题
C interview questions What will print out? main() { char *p1=“name”; char *p2; p2=(char*)malloc(20); memset (p2, 0, 20); while(*p2++ = *p1++);
2008-04-27 23:19:00
349
原创 看你C学到什么程度了
#include#includevoid main(){char far *v=(char far*)0xb8000000;clrscr();*v=w;v+=2;*v=e;getch();}
2008-04-27 22:37:00
306
原创 对V,H滚动条消息的处理(assembler)
.elseif eax == WM_HSCROLL mov eax,wParam .if ax == SB_LINELEFT dec dwPos .elseif ax == SB_LINERIGHT inc
2007-09-30 12:29:00
338
原创 VC动态连接库的使用（一）
今天在网上找了一本电子书。跟着学起来了DLL的使用。。。感触很深：：//库 头文件。。。#ifndef LIB_H#define LIB_Hextern "C" int __declspec(dllexport)add(int x,int y);//定义出口#endif//源文件#include "lib.h"int add(int x,int y)...{ return x+y;}/*
2007-05-05 22:39:00
552
原创 一个简单的MFC程序
#include afxwin.h>#include "resource.h"class CSimplest : CWinApp...{public: virtual BOOL InitInstance();};CSimplest Simplest;class CMywnd:public CFrameWnd...{ CStatic *cs; CMenu *menu;publi
2007-05-03 20:45:00
540
原创 VB取得所有进程
Option ExplicitPrivate Declare Function GetDesktopWindow()Function GetDesktopWindow Lib "user32" () As LongPrivate Declare Function GetWindow()Function GetWindow Lib "user32" (ByVal hwnd As Long, By
2007-05-01 18:19:00
817
原创 VB重启开机关机
Option ExplicitPrivate Declare Function GetCurrentProcess()Function GetCurrentProcess Lib "kernel32" () As LongPrivate Declare Function OpenProcessToken()Function OpenProcessToken Lib "advapi32"
2007-05-01 18:14:00
730
原创 VB去掉关闭窗口
API函数声明Private Declare Function GetSystemMenu()Function GetSystemMenu Lib "user32" (ByVal hWnd As Long, _ ByVal bRevert As Long) As LongPrivate Declare Function RemoveMenu()Function RemoveMen
2007-05-01 10:39:00
1526
原创 VB托盘图标显示API
Const MAX_TOOLTIP As Integer = 64 Const NIF_ICON = &H2 删除图标 Const NIF_MESSAGE = &H1 Const NIF_TIP = &H4 Const NIM_ADD = &H0 添加图标到任务栏提示区 Const
2007-05-01 10:08:00
1783
原创 VB中的控件学习1－－－控件上的动态菜单使用
先建一个菜单，将其INDEX设 Case 0 MSHFlexGrid1.sort = flexSortGenericAscending Case 1 MSHFlexGrid1.sort = flexSortGenericDescending Case 2 MSHFlexGrid1.sort = flexSortNumericAscending Cas
2007-05-01 09:49:00
723
原创 excel 中的VBA
这天一个好朋友叫我帮他算一个EXCEL数据。由于数据太大，我早先想把数据导到数据库再计算，后来，觉得这样太麻烦，顺便也想学学VBA.所以用了VBA，不过这些也太简单了，Private Sub CommandButton1_Click()For i = 3 To 6061 If (i - 3) Mod 201 0 Then Worksheets("sto
2007-04-30 17:06:00
452
原创 Ajax初学2
这两天没有事,想学一下AJAX, 在网上找了一些例子来摸索一下AJAX, 做了一个例子后, 觉得AJAX就那么回事.其实觉得基础还是重要的, 比如JAVASCRIPT语法,特别是DOM,而且AJAX 并不是一个东西,而是一大堆东西的所物....此外,我个人觉得,AJAX再行,如果美工一团,那什么也不是..呵呵 script type="text/javascript">
2007-04-23 17:25:00
472
原创 Ajax初学
在AJAX的程序的开端必须建立一个XML对象的引用:var xmlHttp; function createXMLHttpRequest() ...{ if (window.ActiveXObject) ...{// windows IE xmlHttp = new ActiveXObject("Microsoft.XMLHTTP"); } else i
2007-04-22 12:40:00
382
原创 c#关于怎么获得IP地址
IP 首先引用:using System;using System.Drawing;using System.Collections;using System.ComponentModel;using System.Windows.Forms;using System.Data;using System.Net; System.Net.IPAddress[] addl
2007-04-20 08:21:00
665
原创 C#运用存储过程1
先建立过程:SET QUOTED_IDENTIFIER ON GOSET ANSI_NULLS ON GOALTER proc insert_my_value@myname char(10),@mypassword char(10),@myoutput int outputasinsert into mydatabase1(name,password) values(@myname,@
2007-04-19 16:44:00
424
原创 C#读取注册表中的数据:
using Microsoft.Win32;//必要 RegistryKey rk=Registry.CurrentUser; RegistryKey rk1=rk.OpenSubKey("SoftWare"); RegistryKey rk2=rk1.OpenSubKey("sky
2007-04-19 15:44:00
1405
原创 在C#中读写INI文件:WIN32 API
[DllImport("kernel32")] private static extern long GetPrivateProfileString(string section,string key,string def,StringBuilder retval,int size,string filepath); [DllImport("kern
2007-04-19 15:18:00
436
原创 c#学习笔记:
richbox 文件读取: OpenFileDialog of=new OpenFileDialog(); of.InitialDirectory="c:/"; of.RestoreDirectory=true; of.FilterIndex=1; if (of.ShowDialo
2007-04-19 15:01:00
339
原创 关于生成缩略图:c#
public class image ...{ public Image ResourceImage; private int Iwidth; private int Iheight; public string errMessage; public image(string ImageFileName)
2007-04-19 11:21:00
318
原创 键盘勾子
Option ExplicitPublic Const GWL_WNDPROC = (-4)Public Const WM_USER = &H400Declare Function CallWindowProc Lib "user32" Alias "CallWindowProcA" (ByVal lpPrevWndFunc As Long, ByVal hWnd As Long, ByVal M
2006-10-02 23:11:00
465
原创 用API画边框
Option ExplicitPublic Const BF_BOTTOM = &H8Public Const BF_LEFT = &H1Public Const BF_RIGHT = &H4Public Const BF_TOP = &H2Public Const BF_RECT = (BF_LEFT Or BF_TOP Or BF_RIGHT Or BF_BOTTOM)Public Const
2006-10-02 22:26:00
739
原创 bitblt，getdc抓图
Dim hDC As Long, sx As Integer, sy As Integer Me.Hide DoEvents picCopy.Width = Screen.Width picCopy.Height = Screen.Height picCopy.AutoRedraw = True hDC = GetDC(0
2006-10-02 20:13:00
589
原创 窗口大小
Option ExplicitPublic Const WM_SYSCOMMAND = &H112Public Const SC_CLOSE = &HF060&Public Const SC_MINIMIZE = &HF020&Public Const SC_MAXIMIZE = &HF030&Public Const SC_RESTORE = &HF120&Declare Functio
2006-10-02 19:34:00
364
原创 设置标题栏
Option ExplicitPublic Const WM_SETTEXT = &HCDeclare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As LongOpti
2006-10-02 19:31:00
434
原创 SCroll 与api
Option ExplicitPublic Const EM_SCROLL = &HB5Public Const SB_LINEUP = 0Public Const SB_LINEDOWN = 1Public Const SB_PAGEUP = 2Public Const SB_PAGEDOWN = 3Declare Function SendMessage Lib "user32" Al
2006-10-02 19:26:00
413
原创 list 与api
Public Const LB_SELECTSTRING = &H18COption ExplicitPrivate Sub Cancel_Click() EndEnd Sub Private Sub Ok_Click() MsgBox "您选择了" + List1.TextEnd SubPrivate Sub Text1_Change
2006-10-02 19:23:00
426
原创 对combox的操作
Option ExplicitPrivate Sub Command1_Click() SendMessage Combo1.hwnd, CB_SHOWDROPDOWN, True, ByVal 0&End SubPrivate Sub Command2_Click() SendMessage Combo1.hwnd, CB_SHOWDROPDOWN, False, ByVal
2006-10-02 19:07:00
468
原创 算出当前点击的是第几行，第几个字符·
Option ExplicitPrivate Sub Form_Load()End SubPrivate Sub Text1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single) Dim pos As Long, lc As Long Dim Line As Integer, Cha
2006-10-02 19:03:00
452
原创 用API画多边形
用API画多边形Option ExplicitPrivate Type POINTAPI x As Long y As LongEnd TypePrivate Declare Function Polygon Lib "gdi32" (ByVal hdc As Long, lpPoint As POINTAPI, ByVal nCount As Long) As Long
2006-10-02 15:30:00
592
原创 五子棋（vb算法）
For i = 1 To 11 For j = 1 To 11 If map(i, j) = a And map(i + 1, j + 1) = a And map(i + 2, j + 2) = a And map(i + 3, j + 3) = a And map(i + 4, j + 4) = a Then GameOver = a: Exit Function Next jNext
2006-10-02 11:44:00
1023
原创 如何拦截键盘输入
Option ExplicitDeclare Function SetWindowsHookEx Lib "user32" Alias _"SetWindowsHookExA" (ByVal idHook As Long, ByVal lpfn As Long, _ByVal hmod As Long, ByVal dwThreadId As Long) As LongDeclare Functi
2006-10-02 09:14:00
519
原创 调用API函数设计ABOUT窗口
调用API函数设计ABOUT窗口 ---- windows98 系 统 的 许 多 软 件 中 都 包 含 一 个windows 风 格 的about 窗 口， 它 向 用 户 反 映 了 当 前 系 统
2006-10-02 09:02:00
368
转载 按照CAPTION去关闭某个窗口
你可以使用API函数FindWindow和PostMessage去寻找指定的窗口，并关闭它。下面的例子教给你怎样找到并关掉一个Caption为“Caluclator”的程序。Dim winHwnd As LongDim RetVal As LongwinHwnd = FindWindow(vbNullString, "Calculator")Debug.Print winHwndIf winHwn
2006-10-02 08:48:00
433
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人