как переместить файл другую папку с помощью жерех

Question

как переместить существующий файл в другую папку с помощью жереха, но я пошлю серии файлов «scn_1» только

FROM -- > d:\image\scn_1_1.jpg , d:]image\scn_1_2.jpg 

TO --> d:\image2\backup\scn_1_1.jpg, scn_1_2.jpg 

в осины или VB

это мой Пример кода

Dim fs 
    fs = Server.CreateObject("Scripting.FileSystemObject") 
    Dim scanpath = Request.QueryString("spath") 
    Dim rkpath = Request.QueryString("rkpath") 
    Dim series = Request.QueryString("series") 
    fs.MoveFile("D:\Ethiraj\ScanDcocument\scanimage\test.txt", "D:\Ethiraj\ScanDcocument\Rk_Images\test.txt") 
    fs = Nothing 

Answer 1

Dim фс фс = Server.CreateObject ("Scripting.FileSystemObject") дим scanpath = Request.QueryString ("virtu_dir") дим rkpath = Request.QueryString ("RK_path") дим серия = Запрос. QueryString ("серия") Dim fileToFind = series & "* .jpg" Dim dirs As String() = IO.Directory.GetFiles (путь сканирования, fileToFind) Dim dir As String Для каждого каталога В dirs Если dir.Contains (series) Затем Dim filename = System.IO. Path.GetFileName (dir) fs.CopyFile (dir, rkpath + "\" + filename) fs = Nothing End If Next