ps脚本怎么安装win7运行文件找不到

我个人因为经常作一些数据库方面的程序，对于程序间如何与数据库进行接口的问题之烦是深有体会，因为VB在数据库链接的时候，一般是静态，即数据库存放的路径是固定的，如用VB的DATA，,等到作数据库链接时，如果存放数据库的路径被改变的话，就会找不到路经，真是一个特别烦的事以下命令行将不起作用：

my-\\

只要是向脚本传递包含空格的参数，就必须将整个参数括在双引号内（否则无需如此）

"

Else

&(path,Len(path)-Len())

=objFSO.GetFolder(path)

Setfiles=folder.files

ForEachfileinfiles

targetfile=targetpath&Right(path,Len(path)-Len(sourcepath))&""&file.name&".zip"

Setfp=objFSO.OpenTextFile(targetfile,2,True)

fp.WriteChr(80)&Chr(75)&Chr(5)&Chr(6)&String(18,0)

fp.Close

oApp.Namespace(targetfile).CopyHerepath&""&file.name

WScript.Sleep1000

Next

Setsubfolder=folder.subfolders

ForEachsfolderinsubfolder

GetSourceFilepath&""&sfolder.name

Next

EndIf

EndFunction

SetobjFSO=CreateObject("Scripting.FileSystemObject")

SetoApp=CreateObject("Shell.Application")

sourcepath="C:\DocumentsandSettings\Administrator\桌面\Watermarks"

targetpath="D:\temp"

GetSourceFilesourcepath

SetobjFSO=Nothing

SetoApp=Nothing

即使这样，Friend型过程仍有其他的优势高于Public类型，比如：接受和返回在BAS模块中定义的UDT变量的能力

ID

,64,定义快捷键

　　　EndSub

　　enjoyit!

->