::(例如查找 ipconfig.exe 是否存在):
@echo off
FOR /F "delims=" %%I IN ("ipconfig.exe") DO (if exist %%~$PATH:I (echo yes...) else (echo no...))
pause
bat 做不到,你可尝试写一个VBS脚本,达到目的
建立一个文本文件,复制下段文本到文本文件中,保存。把该文件名修改为
导出.vbs
具体使用时修改下面代码中的三个地方
d:\输出文件名.txt 是输出文件的名字
d:\aaa.mdb 是ACCESS文件的名字
查询1是你要导出的查询的名字
1234567891011121314151617181920212223242526272829Dim AccDim rst Dim db Dim FSO Dim txtFile Dim F Dim strTSet Acc = CreateObject("access.application")Set FSO = CreateObject("Scripting.FileSystemObject")Set txtFile = FSO.CreateTextFile("d:\输出文件名.txt")Acc.OpenCurrentDatabase ("d:\aaa.accdb")Set db = Acc.CurrentDbSet rst = db.OpenRecordset("查询1")For Each F In rst.FieldsstrT = strT &F.Name &","NexttxtFile.WriteLine Left(strT, Len(strT) - 1)rst.MoveFirstDo While Not rst.EOFstrT = ""For Each F In rst.FieldsstrT = strT &F &","NexttxtFile.WriteLine Left(strT, Len(strT) - 1)rst.MoveNextLooptxtFile.Closerst.CloseAcc.Quit
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)