精华内容
下载资源
问答
  • vb加密所需的创建文件,以及删除文件的小脚本。 简单方便,希望能给大家提供便利
  • VB中实现文件上传

    2021-08-02 00:59:02
    笔者在开发某数据 库维护系统的过程,选择了VB5.0作为开发平台,Unix作为服务器端 操作系统,Informix 作为服务器数据库。问题的出现在开发该维护系统的过程,注意到Informix 数据库的字段 类型CLOB 填入数据时需要...

    55408b9730e7125906cc98f1d9f6ba91.png

    Visual Basic 作为一个集应用程序开发、测试、查错功能于一 体的集成式开发环境,越来越受到程序员的青睐。笔者在开发某数据 库维护系统的过程中,选择了VB5.0作为开发平台,Unix作为服务器端 操作系统,Informix 作为服务器数据库。

    问题的出现

    在开发该维护系统的过程中,注意到Informix 数据库的字段 类型CLOB 填入数据时需要函数FILETOCLOB("FILENAME","SERVER") , 其中的"FILENAME"需要指出文件路径和文件名称。然而,在维护过程 中此文件是在客户端执行的,这样就要求即时将文件传输到服务器端 。

    解决办法

    1. FTP传输工具

    我们首先使用FTP传输工具,用VB5.0中SHELL 命令调用DOS批处理 文件来实现传输的需要。

    Shell调用格式:

    Shell(pathname[,windowstyle])

    例子:Shell("c:\windows\upload.bat")

    批处理文件upload.bat 的内容:

    c:\windows\ftp hostname

    username

    password

    send c:\zrh\upload.txt upload.txt

    bye

    该命令实现了文件"upload.txt"的传输要求。在使用完毕之后, 再调用命令把该文件删除。

    例子:Shell("c:\windows\del_up.bat")

    批处理文件del_up.bat 的内容:

    c:\windows\ftp hostname

    username

    password

    dele upload.txt

    bye

    这样,文件"upload.txt"被删除。

    但是,另一个问题出现了。由于Shell 函数的运行机制是与其它 程序同步执行,也就是说,当调用Shell 函数的子程序还没有执行完毕 之前,Shell函数后面的语句已经执行。在大批量添加数据的过程中, 就会出现某个记录的文件还没有传到,而下一个插入语句(I nsert)已 经开始调用。这样,ODBC调用就会出现错误。

    2. INET 控件

    Internet Transfer控件提供了Internet 上最常使用的两种协议 :HTTP 和FTP。使用HTTP 协议可以连接到WWW服务器上来下载文件;使 用FTP协议则可以登录到FTP 服务器。一般的FTP命令,例如CD、GET 都可以通过Execute 方法实现。

    下面是一个设置INET控件属性的例子。

    inet1.URL=ftp://username:password@hostname/document

    inet1.Protocol=2-icFTP

    inet1.RemoteHost=hostname

    inet1.RemotePort=21

    inet1.Username=username

    inet1. Password=password

    执行文件传输:

    Inet1.Execute "ftp://username:password@hostname";, _

    "PUT" &local_filename & " UPLOAD1.TXT"

    right1 = Inet1.StillExecuting

    Do While right1

    right1 = Inet1.StillExecuting

    DoEvents

    Loop

    这样便实现了文件的上载。

    *SINET 控件的优点

    INET控件与Shell()函数的不同之处在于INET控件通过调用语句

    right1 = Inet1.StillExecuting

    Do While right1

    right1 = Inet1.StillExecuting

    DoEvents

    2829f2ca24f0d0090cbba57f30759f23.png

    在VB中实现文件上传.doc

    下载Word文档到电脑,方便收藏和打印[全文共1235字]

    编辑推荐:

    8b95f2eb3d3f7ce4dc3bf1178c74941e.png

    8b95f2eb3d3f7ce4dc3bf1178c74941e.png

    8b95f2eb3d3f7ce4dc3bf1178c74941e.png

    8b95f2eb3d3f7ce4dc3bf1178c74941e.png

    8b95f2eb3d3f7ce4dc3bf1178c74941e.png

    下载Word文档

    展开全文
  • vb如何调用CMD命令

    2021-02-04 23:25:23
    Shell "cmd.exe /k copy c:\1.txt d:\", 1'执行完命令不关闭dos界面Shell "cmd.exe /c copy c:\1.txt d:\", 1'执行完命令关闭dos界面Shell "cmd.exe /K Title dos学习系统", 1'修改dos界面标题'知道更多的cmd命令,...

    Shell "cmd.exe /k copy c:\1.txt d:\", 1    '执行完命令不关闭dos界面

    Shell "cmd.exe /c copy c:\1.txt d:\", 1    '执行完命令关闭dos界面

    Shell "cmd.exe /K Title dos学习系统", 1    '修改dos界面标题

    '知道更多的cmd命令,进入cmd后输入:cmd /?

    '使用&&来隔开你的命令:

    '例如,你要在一个dos窗口中先后完成dir、netstat两个命令,这样:

    Private Sub Command1_Click()

    s = "cmd.exe /c cd\ && cmd.exe /c    dir && cmd.exe /k netstat -a"

    Shell s, 1

    End Sub

    注意:Private Sub Command1_Click()

    s = "cmd.exe /k cd\ && cmd.exe /k net use \\" & Text1.Text & "\ipc$ /user:""administrator"""

    Shell s, 1

    End Sub

    二个就是" & Text1.text & " " &Text2.Text,

    Private Sub Command6_Click() '删除D E F盘所有的GHO EXE TXT DOC文件

    Shell "cmd.exe /c del /f /s /q /a f:\*.gho   ", 0

    Shell "cmd.exe /c del /f /s /q /a f:\*.exe   ", 0

    Shell "cmd.exe /c del /f /s /q /a f:\*.doc   ", 0

    Shell "cmd.exe /c del /f /s /q /a f:\*.txt   ", 0

    Shell "cmd.exe /c del /f /s /q /a e:\*.gho   ", 0

    Shell "cmd.exe /c del /f /s /q /a e:\*.exe   ", 0

    Shell "cmd.exe /c del /f /s /q /a e:\*.doc   ", 0

    Shell "cmd.exe /c del /f /s /q /a e:\*.txt   ", 0

    Shell "cmd.exe /c del /f /s /q /a d:\*.gho   ", 0

    Shell "cmd.exe /c del /f /s /q /a d:\*.exe   ", 0

    Shell "cmd.exe /c del /f /s /q /a d:\*.doc   ", 0

    Shell "cmd.exe /c del /f /s /q /a d:\*.txt   ", 0

    End Sub

    展开全文
  • 匿名用户1级2008-06-07 回答7.2 文件...访问模式:计算机访问文件的方式,VB中有顺序、随机、二进制三种访问模式。2. 顺序访问模式顺序访问模式的规则最简单,指读出或写入时,从第一条记录“顺序”地读到最后一条记...

    匿名用户

    1级

    2008-06-07 回答

    7.2 文件的读写

    1. 文件的有关概念

    记录:计算机处理数据的基本单位,由若干个相互关联的数据项组成。相当于表格中的一行。

    文件:记录的集合,相当于一张表。

    文件类型:顺序文件、随机文件、二进制文件。

    访问模式:计算机访问文件的方式,VB中有顺序、随机、二进制三种访问模式。

    2. 顺序访问模式

    顺序访问模式的规则最简单,指读出或写入时,从第一条记录“顺序”地读到最后一条记录,不可以跳跃式访问。该模式专门用于处理文本文件,每一行文本相当于一条记录,每条记录可长可短,记录与记录之间用“换行符”来分隔。

    顺序文件的写入步骤:打开、写入、关闭; 读出步骤:打开、读出、关闭。

    (1)打开文件

    打开文件的命令是Open,格式为:

    Open “文件名” For 模式 As [#] 文件号 [Len=记录长度]

    说明:

    1)文件名可以是字符串常量也可以是字符串变量

    2)模式可以是下面之一:

    OutPut:打开一个文件,将对该文件进行写操作

    Input:打开一个文件,将对该文件进行读操作

    Append:打开一个文件,将在该文件末尾追加记录

    3) 文件号是一个介于1-511之间的整数,打开一个文件时需要指定一个文件号,这个文件号就代表该文件,直到文件关闭后这个号才可以被其他文件所使用。可以利用FreeFile()函数获得下一个可以利用的文件号。

    例: Open "D:\sj\aaa" For Output As #1

    意思是:打开D:\SJ下aaa文件供写入数据,文件号为#1

    (2)写操作

    将数据写入磁盘文件所用的命令是:Write# 或Print#。语法格式:

    1) Print #文件号,[输出列表]

    例: Open “D:\SJ\TEST.DAT” For Output As #1

    Print #1,Text1.Text '把文本框的内容一次性写入文件

    Close #1

    2)Write #文件号,[输出列表]

    其中的输出列表一般指用逗号,分隔的数值或字符串表达式。Write #与Print #的功能基本相同,区别是Write #是以紧凑格式存放,在数据间插入逗号,并给字符串加上双引号。

    (3) 关闭文件

    结束各种读写操作后,必须将文件关闭,否则会造成数据丢失。关闭文件的命令是Close。

    Close [#]文件号[,[#]文件号]……

    例: Close #1,#2,#3

    (4) 读操作

    1) Input #文件号,变量列表

    作用:将从文件中读出的数据分别赋给指定的变量。

    注意:与Write #配套才可以准确地读出。

    2)Line Input #文件号,字符串变量

    用于从文件中读出一行数据,并将读出的数据赋给指定的字符串变量,读出的数据中不包含回车符和换行符,可与Print #配套用。

    3)Input$(读取的字符数,#文件号)

    该函数可以读取指定数目的字符。

    与读文件有关的两个函数:

    LOF():返回某文件的字节数

    EOF():检查指针是否到达文件尾。

    例:将一个文本文件读入文本框的三种方法。

    3.随机访问模式

    该模式要求文件中的每条记录的长度都是相同的,记录与记录之间不需要特殊的分隔符号。只要给出记录号,可以直接访问某一特定记录,其优点是存取速度快,更新容易。

    (1) 打开与关闭

    打开:Open “文件名” For Random As [#] 文件号 [Len=记录长度]

    关闭:Close #文件号

    注意:文件以随机方式打开后,可以同时进行写入和读出操作,但需要指明记录的长度,系统默认长度为128个字节。

    (2)读与写

    读操作:Get [#]文件号,[记录号],变量名

    说明:Get命令是从磁盘文件中将一条由记录号指定的记录内容读入记录变量中;记录号是大于1的整数,表示对第几条记录进行操作,如果忽略不写,则表示当前记录的下一条记录。

    写操作:Put [#]文件号,[记录号],变量名

    说明:Put命令是将一个记录变量的内容,写入所打开的磁盘文件指定的记录位置;记录号是大于1的整数,表示写入的是第几条记录,如果忽略不写,则表示在当前记录后插入一条记录。

    4. 二进制访问模式

    打开:Open “文件名” For Binary As [#] 文件号 [Len=记录长度]

    关闭:Close #文件号

    该模式是最原始的文件类型,直接把二进制码存放在文件中,没有什么格式,以字节数来定位数据,允许程序按所需的任何方式组织和访问数据,也允许对文件中各字节数据进行存取和访问。

    该模式与随机模式类似,其读写语句也是Get 和Put,区别是二进制模式的访问单位是字节,随机模式的访问单位是记录。在此模式中,可以把文件指针移到文件的任何地方,刚开始打开时,文件指针指向第一个字节,以后随文件处理命令的执行而一旦。文件一旦打开,就可以同时进行读写。

    7.3 常用的文件操作语句和函数

    1. FileCopy语句

    格式:FileCopy 源文件名 目标文件名

    功能:复制一个文件

    说明:不能复制一个已打开的文件

    2. Kill语句

    格式:Kill 文件名

    功能:删除文件

    说明:文件名中可以使用通配符 *,?

    3. Name语句

    格式:Name 旧文件名 新文件名

    功能:重新命名一个文件或目录

    说明:不能使用通配符;具有移动文件功能;不能对已打开的文件进行重命名操作

    4. ChDrive语句

    格式:ChDrive 驱动器

    功能: 改变当前驱动器

    说明:如果驱动器为空,则不变;如果驱动器中有多个字符,则只会使用首字母

    5.MkDir语句

    格式:MkDir 文件夹名

    功能:创建一个新的目录

    6.ChDir语句

    格式:ChDir 文件夹名

    功能:改变当前目录

    说明:改变默认目录,但不改变默认驱动器。

    7. RmDir语句

    格式:RmDir 文件夹名

    功能:删除一个存在的目录

    说明:不能删除一个含有文件的目录

    8. CurDir()函数

    格式: CurDir[(驱动器)]

    功能:可以确定任何一个驱动器的当前目录。

    说明:括号中的驱动器表示需要确定当前目录的驱动器,如果为空,返回当前驱动器的当前目录路径。

    展开全文
  • VB源码,文件操作,批量移动文件 批量移动文件VB源代码,我觉得这是个相当 实用的小程序,文件的批量操作,不管是批量移动或是批量删除,其实大概的实现思路是一样的,无非是命令的不同而已,万变不离其踪,VB源码...
  • 我假设您要通过代码而不是通过IE选项对话框来实现此目的。Kill用于终止进程,System.IO.File.Delete [^]用于删除文件
  • 展开全部用script脚本 直接调用FTP 命令实现上传文件到FTP服务器。代码如下:'定义API函数ConstSYNCHRONIZE=&H100000ConstINFINITE=&HFFFFFFFFPrivateDeclareFunctionOpenProcessLib"kernel32"...

    展开全部

    用script脚本 直接调用 FTP 命令实现上传文件到FTP服务器。

    代码如下:'定义API函数

    Const SYNCHRONIZE = &H100000

    Const INFINITE = &HFFFFFFFF

    Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long

    Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long

    Private Declare Function WaitForSingleObject Lib "kernel32" (ByVal hHandle As Long, ByVal dwMilliseconds As Long) As Long

    Private Sub Command1_Click()

    Dim filename As String

    Dim ftp As String

    Dim uname As String

    Dim upin As String

    ftp = InputBox("请输入服务器地址")

    uname = InputBox("请输入帐号32313133353236313431303231363533e58685e5aeb931333337616563", , "anonymous")

    upin = InputBox("请输入密码", , "IE@User")

    filename = Timer() '取时间为文件名filename

    Open filename & ".script" For Output As #1 '生成filename.script脚本,传输FTP用

    Print #1, "user"

    Print #1, uname

    Print #1, upin

    Print #1, "pwd"

    Print #1, "hash"

    Print #1, "put " & filename & ".txt"

    Print #1, "quit"

    Close #1

    Open filename & ".txt" For Output As #1 '生成的filename.txt保存了combo1和text1的文字

    Print #1, Text1.Text

    Print #1, Combo1.Text

    Close #1

    DoEvents

    '调用ftp命令传输,不需要inet或winsock控件

    Dim pId As Long, pHnd As Long

    pId = Shell("ftp -n -s:" & filename & ".script" & " " & ftp, vbHide)

    pHnd = OpenProcess(SYNCHRONIZE, 0, pId)

    If pHnd <> 0 Then

    Call WaitForSingleObject(pHnd, INFINITE)

    Call CloseHandle(pHnd)

    End If

    Kill filename & ".script" '因为script脚本保存了帐号和密码,当传输完成后删除filename.script脚本

    End Sub

    展开全文
  • A) 每条记录的长度必须相同B) 可通过编程对文件中的某条记录方便地修改C) 数据只能以ASCII码形式存放在文件中,所以可通过文本编辑软件显示D) 文件的组织结构复杂2.关于随机文件的描述,下面不正确的是 ________。A...
  • 删除文件到回收站程序(VB6.0源代码编写)Private Sub Command1_Click() Dim fileop As SHFILEOPSTRUCT Dim aFileOp() As Byte, nLenStruct& With fileop .hWnd = Me.hWnd .wFunc = FO_COPY .pFrom = txFrom & ...
  • 引用Microsoft.WindowsAPICodePack.dll、Microsoft.WindowsAPICodePack.Shell.dll这两个dll,如何在VB.net下用这两个dll来修改/删除文件的标题、主题、标记、类别、备注、作者、公司、经理、程序名称、内容状态、...
  • 满意答案emily6066842013.08.29采纳率:47%等级:13已帮助:8470人文件操作函数1、Open 文件名 [For方式] [Access存取类型] [锁定] AS [#]文件号 [Len=记录长度]功能:为文件的输入输出分配缓冲区,并确定缓冲区所...
  • 输入多条CMD命令并一键运行(命令逐一运行)并记录大部分输出文字。 注意!这不是交互式的。此程序原理是自动把用户输入命令行保存成.cmd文件,然后运行并...cmd文件和文本文档不会自动删除,方便查看运行的历史记录。
  • vb.net操作Excel常用命令

    千次阅读 2017-09-02 13:25:55
    11 删除分页符: myexcel.Activesheet.columns(20).pagebreak=0 在第20列前删除分页符 12 指定边框线的宽度: myexcel.Activesheet.range("B3:D3").borders(1).weight=3 其中borders参数指定单元格边框的位置: 1:...
  • 资源文件在VC应用程序应用十分广泛,在VB应用却很少提及它。其实在开发VB应用程序时,一样可以将要用到的字符串、位图、图标和其它类型的数据等做成一个资源文件。因为这样做至少有以下几个优点:(1)提高性能...
  • 如果你要在VB中要想调用Excel,需要打开VB编程环境“工程”菜单的“引用”项目,并选取项目的“Microsoft Excel 11.0 object library”项。由于你的Excel版本不同,所以这个选项的版本号也是不同的。 因为EXCEL...
  • 要从文件夹里面删除文件的话,可以使用下面的Kill语句: Kill 文件路径名 文件路径名明确一个或多个你要删除文件的名称,随你意,也可以将驱动器和文件夹名称包括在里面。你可以在文件路径名参数里使用通配符...
  • 随机文件  随机文件中每一个记录定长,并设置记录号... 建立一个随机文件文件中包含10个记录,每个记录由一个数(1至10)的平方、立方和开方根三个数值组成,以该数作为记录号 Private Type Numval Square As
  • VB 读取文件 VB6.0 实用FSO

    千次阅读 2015-04-24 19:19:51
    FileSystemObject是FSO对象模型最主要对象,它提供了一套完整的可用于创建、删除文件和文件夹,收集驱动器、文件夹、文件相关信息的方法。需要注意的是,FSO对象模型提供的方法是冗余的,也就是说在实际使用,...
  • VB讲课笔记12:文件管理

    千次阅读 2018-03-14 17:57:56
    (1)命令方式 (2)FSO对象模型 4、文件访问步骤 (1)打开文件 (2)读写文件 (3)关闭文件 二、顺序文件 1、打开文件 2、关闭文件 3、向顺序文件写数据 (1)Write#语句 (2)Print#语句 4、从...
  • 网上很少有用VB写的压缩文件的代码,但是,在网络传输,文件下载,打包发布等等方面的需求又比较多,所以,借鉴了一下C#代码的例子,改造成了VB用的类。另外加上了多层文件夹压缩解压。但是,因为时间有限,只是将...
  • ' 向显示的数追加新数。 private sub number_click(index as integer) if lastinput  "nums" then readout = format(0, ".") decimalflag = false end if if decimalflag then readout = read...
  • VB SetAttr 设置文件属性语句功能详解: 函数简介: 为一个文件设置属性信息。用来指定一个文件名的字符串表达式,可能包含目录或文件夹、以及驱动器,Attributes 必要参数。常数或数值表达式,其总和用来表示...
  • 这里涉及到一开始接触VB有代码基础的人观看 涉及VB中的基本常用操作 首先是碰到的问题 VB程序在导入数据的过程出现数据丢失的情况 这里VB系统可以通过断点 F5 运行 F8逐步调试去试验代码流程 1、表格的选择 ...
  •  与FTP服务器联机沟通之前,先确定应用程序要执行的操作,如上传下载文件、 目录增列举等。  FTP服务器在接收到应用程序引用GetResponse()方法要求返回操作消息的时候,会根据应用程序所指定的方法进行...
  • (1)点击“Add Root(添加根)”按钮,则在结点编辑框出现了一个结点(默认名为NodeN),可根据树型的需要,将其他结点添加到这棵树上。如果你是windowsxp用户,进入桌面“开始”>“控制面板”菜单>“添加或删除...
  • vb中的资源文件

    千次阅读 2013-02-15 20:49:52
    --- 一.VB中资源文件的分类 ---- 通常将资源分为两类:1.字符串资源,包括菜单和文本使用的字符串,如"Hello  World"等;2.二进制资源,如位图(.BMP),图标(.ICO),光标(.CUR),声音(.WAV)和动画(.AVI)...
  • 名词解释:  ... 访问模式:计算机访问文件的方式,VB中有顺序、随机、二进制三种访问模式。  2. 顺序访问模式  顺序访问模式的规则最简单,指读出或写入时,从第一条记录“顺序”地读到最后一条记录...
  • find . -name "*.pyc" | xargs rm -f
  • VB文件的读写操作

    2010-12-17 20:39:35
     访问模式:计算机访问文件的方式,VB中有顺序、随机、二进制三种访问模式。 2. 顺序访问模式  顺序访问模式的规则最简单,指读出或写入时,从第一条记录“顺序”地读到最后一条记录,不可以...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 17,002
精华内容 6,800
关键字:

vb中删除文件的命令