| 2008/12/09(Tue) 15:50:56 編集(投稿者)
■No29419 (りそりそ さん) に返信
> 上記を実現する方法がわからなくて困っております。
ん? そのためのコードは、既に No29416 の (3) にて回答したと思うのですが…。
もしかして、リソース名を文字列で指定したいという意味でしょうか。だとしたら：
Dim targetDir As String = "C:\tmp"
Dim resourceName As String = "TEST"
Dim fileName As String = "TEST2.xls"
Dim r As Object = My.Resources.ResourceManager.GetObject(resourceName)
My.Computer.FileSystem.WriteAllBytes(System.IO.Path.Combine(targetDir, fileName), DirectCast(r, Byte()), False) |