請輸入專案類型(網站專案或者應用程式專案)：
應用程式
各位好!
小弟在tabpage上加了一個 windows media player 來播放影片，
然後我想在影片播放到一半時更換下一部影片，
以下是我寫的部分程式碼：
Me.AxWindowsMediaPlayer2.close()
'找到指定目錄下的所有檔案並刪除()舊
For Each foundFile As String In My.Computer.FileSystem.GetFiles( _
ConfigDirName + "\Media\",
FileIO.SearchOption.SearchAllSubDirectories, "*.*")
My.Computer.FileSystem.DeleteFile(foundFile, _
Microsoft.VisualBasic.FileIO.UIOption.OnlyErrorDialogs, _
Microsoft.VisualBasic.FileIO.RecycleOption.DeletePermanently)
Next
'將新檔案複製到舊檔案的資料夾
For Each existFile As String In My.Computer.FileSystem.GetFiles( _
ConfigDirName + "\FtpV\", FileIO.SearchOption.SearchAllSubDirectories, "*.*")
Dim name() As String = existFile.Split("\")
My.Computer.FileSystem.MoveFile(existFile, ConfigDirName + "\Media\" +
name(name.Length - 1), True)
Next
'播放影片
ShowVideo()
問題就是，如果新檔案跟舊檔案的檔名相同，MoveFile()那一行就會發生例外情況"嘗試
執行未經授權的作業"，
檔名不同的話則是沒問題。
請問各位前輩，這是什麼原因，又該如何解決呢? 感謝!
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 220.130.201.154