vba 打开指定目录下文件

经常见到一些网友，跟U盘病毒作斗争久了，养成了看到磁盘根目录的隐藏文件就删的“职业习惯”，结果当自己买来新电脑的时候，一下子看到C盘下有那么多“病毒”，就全部删了，结果……下次开机的时候系统就起不来了，汗……

所以，我感觉有必要跟大家讲一讲C盘下这些系统文件的作用，以及简要介绍一下系统的启动过程。下面，就请我为大家一一道来：

CONFIG.SYS

CONFIG.SYS是包含在DOS（磁盘操作系统，Disk Operating System）中的一个文本文件命令，它告诉操作系统计算机如何初始化。多数情况下，CONFIG.SYS命令制定内存设备驱动和程序，以控制硬件设备；开启或进制系统特征；以及限制系统资源。CONFIG.SYS在autoexec.bat（自动批处理程序）文件执行前载入。

AUTOEXEC.BAT

DOS在启动会自动运行autoexec.bat这个文件，一般我们在里面装载每次必用的程序，如: path(设置路径)、smartdrv(磁盘加速)、 mouse(鼠标启动)、mscdex(光驱连接)、 doskey(键盘管理)、set(设置环境变量)等。

IO.SYS

IO.SYS提供标准硬件的输入/输出接口和DOS的中断调用，在电脑启动过程中，

‘sub xlsOpen()

Set rrr = CreateObject(\ Set r = rrr.GetFolder(\练习\\\

Application.ScreenUpdating = False For Each i In r.Files

Workbooks.Open Filename:=(\练习\\\ Sheets(1).Cells(2,5 )=“10”

ActiveWorkbook.Close savechanges:=true Next

Application.ScreenUpdating = True ‘End Sub

ExecuteExcel4Macro \ ‘打印当前SHEET

ActiveWorkbook.Close savechanges:=false ‘不

linux复制指定目录下的全部文件到另一个目录

linux复制指定目录下的全部文件到另一个目录中
复制指定目录下的全部文件到另一个目录中
文件及目录的复制是经常要用到的。linux下进行复制的命令为cp。
假设复制源目录 为 dir1 ,目标目录为dir2。怎样才能将dir1下所有文件复制到dir2下了
如果dir2目录不存在，则可以直接使用
cp -r dir1 dir2
即可。
如果dir2目录已存在，则需要使用
cp -r dir1/. dir2
如果这时使用cp -r dir1 dir2,则也会将dir1目录复制到dir2中，明显不符合要求。
ps:dir1、dir2改成对应的目录路径即可。

cp -r /home/www/xxx/statics/. /home/www/statics
如果存在文件需要先删除
rm -rf /home/www/statics/*
否则会一个个文件提示你确认，使用cp -rf 也一样提示

--------------------------------------

linux下cp整个文件夹的文件到另一个文件夹
cp -ri A/B/* A1/B1/ 回车
若复制过程中询问是否覆盖，输入y按回车，若不想看到提示直接覆盖使用-rf
另外若A A

VBA文件操作及目录操作

VBA包含了许多用于文件操作的语句和函数，可以满足绝大多数情况下的文件操作要求。下面我们按照操作目的进行一一介绍。

（一）文件处理

1.Name 语句

语法：Name oldpathname As newpathname

功能：重命名一个文件、目录、或文件夹，移动一个文件。

说明：在一个已打开的文件上使用 Name，将会产生错误。进行文件操作时，一定要注意错误处理。

示例：

On Error Resume Next '错误处理

Name \ '重命名 Name \ '移动文件

Name \ '跨驱动器移动并重命名文件

注意：Name不能移动一个目录或文件夹。

2、FileCopy 语句

语法：FileCopy source, destination

功能：复制一个文件。

说明：如果对一个已打开的文件使用 FileCopy 语句，则会产生错误。

示例：

FileCopy \ '从F盘复制TEST.xls到E盘

3、Kill 语句

语法：Kill pathname

功能：从磁盘中删除文件。

说明：Kill 支持多字符 (*) 和单字符 (?) 的统配符来指定多重文

VBA不用打开excel文件就可读写单元格数据 使用WPS时编的

在第一个工作薄添加CommandButton3按钮添加代码如下：

Private Sub CommandButton3_Click() Dim Wb As Workbook

Set Wb = GetObject(\项目设计\\操作表\\联系2.xls\ Wb.Sheets(1).Range(\

Workbooks(1).Sheets(1).Range(\ Dim str As String

str = Wb.Sheets(1).Range(\ MsgBox (str)

Wb.Sheets(1).Visible = xlSheetVisible Wb.Save Wb.Close True Set Wb = Nothing

End Sub

在第一个工作薄“Workbooks(1)”添加按钮

CommandButton1，添加如下代码：

Private Sub CommandButton1_Click()

Dim Wb As Workbooks

fileToOpen = Application.Ge

篇一：jsp是什么文件 怎么打开

JSP(Java Server Pages)是由Sun Microsystems公司倡导、许多公司参与一起建立的一种动态网页技术标准。 JSP技术是用JAVA语言作为脚本语言的，JSP网页为整个服务器端的JAVA库单元提供了一个接口来服务于HTTP的应用程序。

可以用记事本打开

篇二：Eclipse中如何正确运行jsp文件

Eclipse中如何正确运行jsp文件

一、 确保自己的电脑上已经正确安装java运行环境；

通过cmd切换到dos环境，然后通过java –version命令来验证自己的jdk安装是否正确。

二、 下载相应的tomcat到本地安装，这里我选择的是tomcat6.0，安装完毕

后在浏览器地址栏输入：http://localhost:8080/,如果出现下面画面，那么恭喜你，你的tomcat已经安装完毕！

三、 在eclipse中建立jsp项目

File->new->Other出现如下图案

点击next，进入下面界面

配置红框中的内容，让它们符合你自己的下载的tomcat版本。

四、 配置servers在window->preferences->Server配置出如下界面

点击ok完成配置，进入

linux c 下如何获得目录下的文件数目

int main(int argc, char **argv) {

DIR * pdir;

struct dirent * pdirent; struct stat f_ftime;

int fcnt;/*文件数目统计*/ pdir=opendir(\ if(pdir==NULL) { return(-1); } fcnt=0;

for(pdirent=readdir(pdir);pdirent!=NULL;pdirent=readdir(pdir)) {

if(strcmp(pdirent->d_name,\

if(stat(pdirent->d_name,&f_ftime)!=0) return -1 ;

if(S_ISDIR(f_ftime.st_mode)) continue; /*子目录跳过*/ fcnt++;

printf(\文件:%s\\n\ }

printf(\文件总数%d\\n\ closedir(pdir); return 0; }

#include #include #include #include #include

如何在VBA判断EXCEL或WORD文件已经打开，并用代码关闭

字体: 小 中 大 | 打印 发表于: 2003-6-17 20:17 作者: huanghai 来源: Office中国社区门户

如何在VBA（ACCESS）中用代码判断一个EXCEL或WORD文件已经打开，并用代码关闭

我也来说两句 查看全部回复 最新回复

?

竹笛 (2003-6-18 06:17:00)

笨办法，你试试：

1、在ACCESS代码中获取那个EXCEL文件中一个指定的cells的value 2、如果出错……，您知道了吧。 3、关闭这个EXCEL： olxApp.Quit

Set olxApp = Nothing '这个你是知道的

?

李寻欢 (2003-6-18 06:20:00)

Dim MyXL As Object

Set MyXL = GetObject(, \ For Each axls In MyXL.workbooks

If InStr(1, axls.Name, \ 'axls.Close '关闭文档 MyXL.Quit '退出excel

文件名: 打开方式或软件: 001 超星浏览器 002 超星浏览器 003 超星浏览器

!!! 没有下载完成的另时文件 aiff Windows Media Player ani 动画鼠标 ans 记事本

ape Monkey s audioWinamp 2.81以上版本 arj 压缩文件 ARJ

asp 无效下载文件,重新下载 au Windows Media Player

avi Media player金山影霸(如果不能播放请装divx插件) bik bink playerRAD Game Tools bin daemon tool虚拟光驱 bmp 画图（Windows附件） box Lotus Notes c Turbo C;记事本

cab WinRARINSTALL SHELDWinzip caj Cajviewer ccd daemon tool cdr Corel DRAWfreehand chm Windows帮助文件,直接打开 cmb ComicGURU cpp C++记事本 cue daemon tool cur 静态鼠标

Dat 不确定打开方式,多种格式的数据文件

打开文本文件是不少程序必须处理的问题。如何更有效地打开文本文件应该是一个值得研究的课题。为此，笔者将自己搜集到的几种方法无私地奉献出来(-_-)，供各位参考。同时期盼大家也来参与，借VB编程乐园这块宝地互相交流。如您有这份心，土人在这里先说声谢谢！

下面所举的例子均假设F盘下有一个名为d.txt的文本文件，若需要尝试这些例子请作相应的改动。

方法一:

用定长的String变量获取文本内容。由于定长String变量支持的下界为65400,所以在打开超过32K字节的文件时超出部分的字节将无法获取: Private Sub Command1_Cliack()

Dim sA As String * 65400 '声明定长String变量

Open \用二进制打开文件 Get #1, , sA '用Get语句从文件中获取字节 Text1 = sA '显示打开的文件 Close #1 '关闭文件 End Sub

方法二:

先声明一字符串变量，然后用空格填充字符串，使变量大小与文件大小一致，再通过Get语句将文件全部数据存储到变量中，从而达到获取整个文件字节数的目的。此法可以打开大于32K的文件，但应该注意的是，装载文件的容器必须能装载大于32K的文件