如何给文件重命名!如a.bsd 改为b.yu
要求文件不存在时跳到下条语句继续执行!

解决方案 »

  1.   

    API 中有一个这方面的函数,你可以去查查。
      

  2.   

    http://expert.csdn.net/Expert/FAQ/FAQ_Index.asp?id=18804
      

  3.   

    CopyFile VB声明 
    Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long 
    说明 
    复制文件。与vb的filecopy命令相似 
    返回值 
    Long,非零表示成功,零表示失败。会设置GetLastError 
    参数表 
    参数 类型及说明 
    lpExistingFileName String,源文件名 
    lpNewFileName String,目标文件名 
    bFailIfExists Long,如果设为TRUE(非零),那么一旦目标文件已经存在,则函数调用会失败。否则目标文件被改写 
      

  4.   

    DeleteFile VB声明 
    Declare Function DeleteFile Lib "kernel32" Alias "DeleteFileA" (ByVal lpFileName As String) As Long 
    说明 
    删除指定文件 
    返回值 
    Long,非零表示成功,零表示失败。会设置GetLastError 
    参数表 
    参数 类型及说明 
    lpFileName String,欲删除文件的名字 
    注解 
    与vb的kill语句相似,在windows 95下使用这个函数要小心——即使文件当前正由一个应用程序打开,该函数也会将其删除
     
      

  5.   

    简单:
    on error resume next
    name "C:\a.bsd" as "C:\b.yu"
      

  6.   

    on error goto catch
    ...
    name oldname as newname
    ...
    exit sub
    catch:
     resume next这个这么简单,怎么没人用啊!?
      

  7.   

    name a.bsd as b.yu
    kill a.bsd
    就可以了!!!!!!!!!!!!!
      

  8.   

    Dim OldName As String
    Dim NewName As StringOldName="a.bsd"
    NewName="b.yu"Name OldName As NewName就行了