- 博客(16)
- 收藏
- 关注
原创 动态设置IE代理服务器,并不用重启IE
[DllImport(@"wininet", SetLastError=true, CharSet=CharSet.Auto, EntryPoint="InternetSetOption", CallingConvention=CallingConvention.StdCall)]public static extern bool InternetSetOption(int hInternet,i
2005-04-25 18:55:00 4361 3
原创 复制目录
csvoid copyDirectory(string sourcePath, string destinationPath){ foreach(string filestr in System.IO.Directory.GetFiles(sourcePath)) { if (!System.IO.Directory.Exists(destinationPath)) System.IO.Di
2004-12-15 15:59:00 1305 1
原创 c#中用axWebBrowser中提交表单,或点击某个对象
dddd.htm -----------------------------------------------------------------------------------form1.csusing System;using System.Drawing;using System.Collections;using System.ComponentModel;using Syste
2004-12-14 13:36:00 3026 4
转载 c# to VB.net or Vb.net to C# 转换
http://www.developerfusion.com/utilities/convertvbtocsharp.aspx
2004-12-10 23:58:00 1044
转载 SQLServer中一个多用户自动生成编号的过程
if not exists (select * from dbo.sysobjects where id = object_id(N[IndexTable]) and OBJECTPROPERTY(id, NIsUserTable) = 1)create table IndexTable(Ex char(20), num integer)gocreate procedure Set
2004-12-10 23:57:00 1247
原创 给LISTVIEW加背景图
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls, commctrl, ImgList;type TForm1 = class(TForm) ListView1: TLi
2004-11-08 14:55:00 2730
原创 关于网页滚动条的定位
思路很简单,就是利用cookie记录用户当前的document.all.scrollTop,然后在页面onload的时候读出cookie赋值给body.scrollTopvoid Page_load(object sender, EventArgs e){ btn.Attributes["onclick"] = "document.cookie = /"scrollTop=/" + documen
2004-11-06 20:13:00 2054 1
原创 例用AdoQuery+ListView分页
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DB, ADODB,Grids, DBGrids, StdCtrls, ComCtrls;type TForm1 = class(TForm) Button1
2004-11-05 20:52:00 1999
原创 动态创建TABLE的行与列
void btn_click(object sender, EventArgs e){ ArrayList x = new ArrayList(); if (ViewState["myList"] != null) { x = (ArrayList)ViewState["myList"]; } x.Add(DateTime.Now.ToString() + "," + DateTime.No
2004-11-04 16:24:00 1836
原创 设置webBrowser编码
添加引用Microsoft.mshtmlusing mshtml;DocumentDownComplate eventobject refLevel = 7;IHTMLDocument2 m_hDoc = (IHTMLDocument2)axWebBrowser1.Document;m_hDoc.charset = "gb2312";axWebBrowser1.Refresh2(ref
2004-08-08 22:55:00 5885
原创 屏蔽webBrowser右键
public delegate void DHTMLEvent(IHTMLEventObj e); public class DHTMLEventHandler { public DHTMLEvent Handler; HTMLDocument Document; public DHTMLEventHandler(HTMLDocument doc) { this.Document
2004-08-08 22:54:00 2466 1
原创 枚举NT系统服务
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Winsvc, StdCtrls;type TForm1 = class(TForm) Button1: TButton; Memo1: TMemo;
2004-08-06 18:28:00 1204
原创 UrlDecode
private void button1_Click(object sender, System.EventArgs e) { string test = "%C4%E3%BA%C3%B0%A1+sdfsfa%26"; MessageBox.Show(UrlDecode(test)); } string HexToStr(string HexSource) { s
2004-08-04 12:22:00 1629
原创 获取任务栏状态
APPBARDATA apd; apd.cbSize = sizeof(apd); CString str; SHAppBarMessage(ABM_GETTASKBARPOS , &apd); str.Format("left %d,top %d,width %d,height %d",apd.rc.left,apd.rc.top,apd.rc.right - apd.rc.left,apd.
2004-07-30 01:09:00 1337
原创 更改屏幕显示区
找设置任务栏高度时发现了这些代码,保留了下来 procedure FullScreenArea; var rcWork: TRect; begin rcWork.Top:=0; rcWork.Left:=0; rcWork.Bottom:=GetSystemMetrics(SM_CYSCREEN); rcWork.Right:=GetSystemMetrics(SM_CXSCR
2004-07-22 01:25:00 1222
原创 改变任务栏高度
这个星期比较烦。。。老是在想着一个关于设置任务栏高度的问题!! 后来,在好友修罗跟农民的帮助下,才发现我一开始就是错的,我只想只对Shell_TrayWnd动手脚,没有想过它里面还包含了ReBarWindow32这个类! void CBrowserDlg::OnBnClickedButton1(){ HWND s_Hwnd = ::FindWindow("Shell_TrayWnd", NUL
2004-07-22 00:59:00 2055 1
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人