vs2010
摘要：
http://www.microsoft.com/visualstudio/en-us/try/default.mspx 阅读全文
posted @ 2009-11-03 14:00 lgzh 阅读(134) 评论(0) 推荐(0) 编辑
图片灰度化。
摘要：
Option Explicit'图像处理的一个例子'Powered by Jadeluo , 2004/02/21'EMail: Jadeluo@sina.comPrivate Type BITMAPbmType As LongbmWidth As LongbmHeight As LongbmWidthBytes As LongbmPlanes As IntegerbmBitsPixel As I... 阅读全文
posted @ 2009-07-22 17:45 lgzh 阅读(951) 评论(0) 推荐(0) 编辑
WebBrower控件显示html代码及打印
摘要：
Private Sub Command1_Click()WebBrowser1.ExecWB 6, 1End SubPrivate Sub Command2_Click()WebBrowser1.Navigate2 "http://www.google.com"End SubPrivate Sub Command3_Click()'WebBrowser1.Navigate "about:blank... 阅读全文
posted @ 2009-07-13 17:11 lgzh 阅读(669) 评论(0) 推荐(0) 编辑
http://topic.csdn.net/t/20051212/01/4452683.html
摘要：
http://topic.csdn.net/t/20051212/01/4452683.html 阅读全文
posted @ 2009-01-08 22:15 lgzh 阅读(153) 评论(0) 推荐(0) 编辑
vb 汉字 编码
摘要：
Function UrlEncode(ByVal urlText As String) As String Dim i As Long Dim ansi() As Byte Dim ascii As Integer Dim encText As String ansi = StrConv(urlText, vbFromUnicode) encText =... 阅读全文
posted @ 2009-01-08 16:32 lgzh 阅读(558) 评论(0) 推荐(0) 编辑
vb word
摘要：
http://www.yesadmin.com/360/108991/index.html PublicFunctionGetCode(CodeBase,Url)'第一个参数是设置编码方式(GB2312或UTF-8)第二个参数是地址.DimxmlHTTP1SetxmlHTTP1=CreateObject("Microsoft.XMLHTTP")xmlHTTP1.Open"get",Url,True... 阅读全文
posted @ 2008-12-28 21:29 lgzh 阅读(259) 评论(0) 推荐(0) 编辑
加密
摘要：
http://www.sudil.com/rjjm.htmhttp://www.delphibbs.com/delphibbs/dispq.asp?lid=425379 阅读全文
posted @ 2008-12-18 14:29 lgzh 阅读(151) 评论(0) 推荐(0) 编辑
Activex word
摘要：
http://www.cnblogs.com/taobataoma/archive/2007/04/30/733242.html http://www.codeproject.com/KB/cs/webbrowser.aspx 阅读全文
posted @ 2008-12-10 22:08 lgzh 阅读(182) 评论(0) 推荐(0) 编辑
WebBrowse 保存数据库word、
摘要：
Hi,This is an extended question to http://www.experts-exchange.com/Programming/Languages/C_Sharp/Q_23183926.html. I have added a memorystream to a webbrowser: public WebBrowser createEmbeddedWord(Poin... 阅读全文
posted @ 2008-12-08 22:29 lgzh 阅读(622) 评论(0) 推荐(0) 编辑
页面内打开word 组件。
摘要：
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As LongPrivate Declare Function SetParent Lib "user32" (ByVal hWndChild... 阅读全文
posted @ 2008-12-05 22:08 lgzh 阅读(266) 评论(0) 推荐(0) 编辑
