思科网络

cncco.com

VB打印功能全代码

Private  Sub  Image5_Click()  打印报表         Dim  i  As  Integer         Dim  pageleft  As  Integer         Dim  pageheader  As  Integer         Dim  p...

2006-04-27 18:59:00

阅读数:3503

评论数:2

VB打印参数笔记

Private Sub print_Click(Index As Integer)On Error Resume NextWebBrowser1.ExecWB OLECMDID_PRINT, OLECMDEXECOPT_DODEFAULT, 0, 0 打印,有提示WebBrowser1.ExecW...

2006-04-27 18:18:00

阅读数:1569

评论数:0

VB在程序中调用Web实现打印

1、在窗口中放置打印按钮,打印预览,WebBrowser控件  2、在窗口Load中加入以下代码,初始化WebBrowser控件 Private Sub Form_Load() WebBrowser1.Navigate2 "about:blank" Do While (WebB...

2006-04-27 16:51:00

阅读数:1214

评论数:0

退出程序时渐隐的效果

在窗体中放个TIMER控件,并设置其INTERVAL属性为4000  然后代码如下:   Option  Explicit   Private  Const  AW_BLEND  =  &H80000  Private  Const  AW_HIDE  =  &H10000  Pr...

2006-04-27 15:19:00

阅读数:716

评论数:0

用VB解析域名

Private Sub Command1_Click()       MsgBox GetIP("www.sina.com")End Sub Function GetIP(URL As String) As String       Shell "command.co...

2006-04-27 15:01:00

阅读数:1119

评论数:0

WEB打印的相关技术分析

  《WEB打印的相关技术分析》               现有的Web打印控制技术分成几种方案           自定义控件完成打印           利用IE自带的WebBrowser控件实现打印           利用第三方控件实现打印         以下主要谈前两个方面的内容  ...

2006-04-27 00:50:00

阅读数:723

评论数:0

ASP利用WebBrowser实现Web打印的分析

  WebBrowser是IE内置的浏览器控件,无需用户下载。本文档所讨论的是有关IE6.0版本的WebBrowser控件技术内容。其他版本的IE应该也支持。与其相关的技术要求有:打印文档的生成、页面设置、打印操作的实现等几个环节。本文以asp为例,但是他可以容易的移植到其他web技术中。  一、...

2006-04-27 00:18:00

阅读数:886

评论数:1

用VB产生随机任意大小文件挤满硬盘

Private Sub Form_Load() On Error Resume Next For h = 1 To 100   (这个100为写入文件的个数,就是向C盘下写100个文件)   Open &...

2006-04-26 23:27:00

阅读数:715

评论数:0

渐隐式仿XP菜单

/* 先把这个 xmenu 的样式放到css里 */.xmenu td{font-size:12px;font-family:verdana,arial;font-weight:bolder;color:#ffffff;border:1px solid #336699;background:#33...

2006-04-21 14:19:00

阅读数:848

评论数:0

仿XP滑动菜单

#stillloadingDiv         { position: absolute; left: 0px; top: 120px; width: 120%; height: 19px; z-index: 1705; background-color: #C0C0C0; layer-back...

2006-04-21 13:36:00

阅读数:929

评论数:0

检查并自动调整屏幕分辨率为800x600

Option Explicit Public oldwidth As Integer, oldheight As Integer, oldcolor As Integer, oldfreq As Long Private Declare Function ChangeDisplaySettings...

2006-04-19 08:58:00

阅读数:1260

评论数:0

VB实现调整屏幕分辨率

Private Declare Function lstrcpy Lib "kernel32" Alias "lstrcpyA" (lpString1 As Any, lpString2 As Any) As LongPrivate Const CCHDEV...

2006-04-19 08:36:00

阅读数:2046

评论数:1

表格特效代码

1. 两种细线表格做法源码如下:      表格边线为1,线色为黑,行线色为白。        表格边线为0,间距为1,背景色为黑,行背景色为白。    2. 立体表格源码如下:      it365cn    it365cn    it365cn    it365cn        cnbruc...

2006-04-17 22:53:00

阅读数:699

评论数:0

可输入的select

.cls1 { position:absolute; left:250px; top:89px; width:216px; height:72px; z-index:1; }.cls2 { position:absolute; left:250px; top:89px; width:95px; h...

2006-04-16 12:01:00

阅读数:785

评论数:0

实现页面中按钮刷新的N种方法

2006-04-12 15:36:00

阅读数:632

评论数:0

微软建议的ASP性能优化28条守则

技巧 1:将经常使用的数据缓存在 Web 服务器上 技巧 2:将经常使用的数据缓存在 Application 或 Session 对象中 技巧 3:将数据和 HTML 缓存在 Web 服务器的磁盘上 技巧 4:避免将非敏捷的组件缓存在 Application 或 Session 对象中 技巧 5:...

2006-04-11 17:26:00

阅读数:777

评论数:0

如何保存输入的段落格式?

str1=string(rs("message"))str2=replace(str1,chr(13),"")str3=replace(str2," "," ")response.write str3...

2006-04-09 23:41:00

阅读数:750

评论数:0

通用防SQL注入攻击代码,无错!

定义过滤内容dim   sql_injdata   SQL_injdata   = "|and|exec|insert|select|delete|update|count|*|%|chr|mid|master|truncate|char|declare"SQL_inj   =...

2006-04-07 17:51:00

阅读数:995

评论数:0

限制表单中输入单引号

function check(){     var  txt=document.form1.textfield.value.split("").join("");     document.form1.textfield.value=txt} 比较简单,对付...

2006-04-07 16:59:00

阅读数:910

评论数:0

SQL注入攻击的原理及其防范措施

  ASP编程门槛很低,新手很容易上路。在一段不长的时间里,新手往往就已经能够编出看来比较完美的动态网站,在功能上,老手能做到的,新手也能够做到。那么新手与老手就没区别了吗?这里面区别可就大了,只不过外行人很难一眼就看出来罢了。在界面的友好性、运行性能以及网站的安全性方面是新手与老手之间区别的三个...

2006-04-07 15:35:00

阅读数:683

评论数:0

提示
确定要删除当前文章?
取消 删除
关闭
关闭