我在用VB在做一个东西,现需要一个函数能实现如下功能:将指定URL处的文件下载到指定的文件夹里,并能保持原来的类型不变.参数有三:一个是URL,指定文件的下载地址,一个是本地保存路径,是个文件夹,比如说"D:/TMP",一个是文件类型,比如PDF,DOC可以通过Microsoft Internet Transfer Control来实现下载：strURL = "http://www.GreatSi

Private Sub Form_Load()  Text1.Text = App.Path & "/db1.mdb"End SubPrivate Sub Command1_Click()  On Error Resume Next  Dim sNewName As String  Dim sBakFile As String  sNewName = Text1.Text  sDatabase =

检测是否连接到Internet以及是通过何种方式（Modem,LAN,Proxy）连接到Internet的http://www.applevb.com/sourcecode/connect_to_net.zip

概要在 Microsoft Windows 95、Windows 98 和 Windows Millennium Edition (Me) 系统上，可以灵活地自定义页面大小。但在运行 Windows NT 和 Windows 2000 的系统上，必须先将所有页面大小定义为页形 (form) 才能使用。本文介绍如何在 Windows NT 和 Windows 2000 上打印自定义页面大小，并包含一

This code is extremely useful if you ever need to capture output from a DOS screen/console. The simple demonstration below, shows how to capture the output from a batch file.Note, to redirect other

1、在窗体中添加一个PictureBox控件2、将控件的OLEDropMode设置为13、在OLEDragDrop事件中通过Data.Files(1)就可以获得IE中拖放过来的图片在IE临时文件夹中的全路径名。将这个文件拷贝到你需要的地方就可以了。

操作步骤：1、在工程中添加COM的Microsoft Internet Controls的引用（这个引用对应的文件是shdocvw.dll，通常在system32目录下）。2、如下代码： Public Class Form1Class Form1    Private Sub NewWindow3()Sub NewWindow3(ByRef ppDisp As Object, ByRe

今天在CSDN上看到一个问题，就是如何实现简单的四则运算，例如a+b-c*(a+e)。然后将参数值代入到算式中进行计算。通过ScriptControl可以完成这个功能。首先创建一个工程，在工程中加入一个新的类，类名称为Class1，然后在类中加入以下定义 ：Public k1 As IntegerPublic a As IntegerPublic b As IntegerPublic c