cmd提取文件名?
1、使用快捷键win+r，打开运行的窗口，输入cmd之后进行回车，2、在弹出的管理员名利提示符窗口中，输入dir h：\我的工具 /b》c：\users\administrator\desktop\1.txt回车，3、在桌面上就会生成一个1.text的记事本文件，4、然后打开文件之后，我们会看到一些文件名称，5、打开源地址文件夹我的工具中文件夹都包含在记事本中了，以上就是通过使用dos命令批量提取文件名的操作办法，是不是挺简单的。
asp文件名提取
判断当前网页的文件名是否是xxx.asp,如果是跳转到xxx1.asp,如果不是结束dim url,jmp
jmp = "xxx.asp"
url = getfilename()
if url=jmp then
jmp = replace(jmp,".asp","1.asp")
response.Redirect jmp '跳转到xxx1.asp
else
response.end '不是结束
end if
function getfilename()
getfilename=right(Request.ServerVariables("SCRIPT_NAME"),len(Request.ServerVariables("SCRIPT_NAME"))-InStrRev(Request.ServerVariables("SCRIPT_NAME"),"/"))
end function
%>
相关内容扩展阅读:
如何用bat的方式批量提取服务器中的文件夹路径
如何用bat的方式批量提取ftp服务器中的文件夹路径*** /步骤
C程序：求教大神（急）提 取 字 符 串 文 件 名
题 目 内容 ： 提 取字符串 中 的 文 件 名 ，根据输入 的 整 数， 输出 一 组 新 的 文 件 名 。输入 格 式 ：
含有 文 件 名 的 字符串 （ 回 车 ）
整 数（ 回 车 ）
输出 格 式 ：
一 组 新 文 件 名
输入 样 例 ：
music-96_MP3 ： 回 车 ）
5 ： 回 车 ）
输出 样 例 ：
music-97_MP3 ： 回 车 ）
music-98_MP3 ： 回 车 ）
music-99_MP3 ： 回 车 ）
music-I00_MP3 ： 回 车 ）
music-101_MP3 ： 回 车 ）
#include <string.h>
#define N 1000
int num; // 文件中的数字
char strPre[N]; // 文件的前缀
char strExten[N]; // 文件的扩展名
int partitionFileName(char str[])
{
int i,j;
int pos1,pos2;
for(i=0;str[i]!='\0';i++)
{
if(str[i]=='.') pos2=i;
}
for(i=pos2-1;i>=0;i--)
{
if(str[i]>='0'&&str[i]<='9')
continue;
else
{
pos1=i;
break;
}
}
// 拿到文件名中的数字
num=0;
for(i=pos1+1;i<pos2;i++)
{
num += str[i]-'0';
num *= 10;
}
num/=10;
// 拿到前缀
for(i=0;i<=pos1;i++)
strPre[i]=str[i];
strPre[i]='\0';
// 拿到扩展名
for(i=pos2,j=0;str[i]!='\0';i++,j++)
strExten[j]=str[i];
strExten[j]='\0';
return 0;
}
int main()
{
int i;
int fileNameNum;
char fileName[N];
// 输入
gets(fileName);
scanf("%d",&fileNameNum);
// 提取出文件名前缀，数字以及扩展名，存入全局变量
partitionFileName(fileName);
for(i=1;i<=fileNameNum;i++)
{
printf("%s%d%s\n",strPre,num+i,strExten);
}
return 0;
}
VB DIR 提取长度超过256字节的文件名
VB6 用dir提取文件名长度超过256字节后会报错
请问如何才能提取到？
一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七
这个文件名超过256字节吧?
使用FindFirstFile这个API函数可以解决此类问题。。。
以下是测试代码，花了半个小时，得加点分。。。
Private Declare Function FindFirstFile Lib "kernel32" Alias "FindFirstFileA" (ByVal lpFileName As String, lpFindFileData As WIN32_FIND_DATA) As Long
Private Declare Function FindNextFile Lib "kernel32" Alias "FindNextFileA" (ByVal hFindFile As Long, lpFindFileData As WIN32_FIND_DATA) As Long
Private Declare Function FindClose Lib "kernel32" (ByVal hFindFile As Long) As Long
'更大路径长度和文件属性常量的定义
Private Const MAX_PATH = 260
Private Const FILE_ATTRIBUTE_ARCHIVE = &H20
Const FILE_ATTRIBUTE_COMPRESSED = &H800
Const FILE_ATTRIBUTE_DIRECTORY = &H10
Const FILE_ATTRIBUTE_HIDDEN = &H2
Const FILE_ATTRIBUTE_NORMAL = &H80
Const FILE_ATTRIBUTE_READON *** = &H1
Const FILE_ATTRIBUTE_SYSTEM = &H4
Const FILE_ATTRIBUTE_TEMPORARY = &H100
'自定义数据类型FILETIME和WIN32_FIND_DATA的定义
Private Type FILETIME
dwLowDateTime As Long
dwHighDateTime As Long
End Type
Private Type WIN32_FIND_DATA
dwFileAttributes As Long
ftCreationTime As FILETIME
ftLastAccessTime As FILETIME
ftLastWriteTime As FILETIME
nFileSizeHigh As Long
nFileSizeLow As Long
dwReserved0 As Long
dwReserved1 As Long
cFileName As String * MAX_PATH
cAlternate As String * 14
End Type
Private Sub Command1_Click()
Dim sPath$, strFileName$
sPath = "C:\Temp\一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七八九十一二三四五六七.txt"
Debug.Print "文件全路径长度："; Len(sPath), "文件名长度："; Len(sPath) - Len("C:\Temp\")
Dim lHandle As Long 'FindFirstFileA的句柄
Dim tFindData As WIN32_FIND_DATA '
lHandle = FindFirstFile(sPath, tFindData)
If lHandle = -1 Then
If tFindData.dwFileAttributes <> &H20 Then '文件 &H10 目录
MsgBox "没有找到文件：" & vbCrLf & vbCrLf & sPath
Else
Debug.Print "文件名称:"; tFindData.cFileName
Debug.Print "文件长度:"; tFindData.nFileSizeLow
End If
Else '查询结束或发生错误
MsgBox "查询结束或发生错误"
End If
FindClose lHandle
End Sub
