「画像のアップロード」の編集履歴（バックアップ）一覧はこちら

「画像のアップロード」(2008/02/27 (水) 09:20:02) の最新版変更点

追加された行は緑色になります。

削除された行は赤色になります。

[[マイクロソフトの解説>>http://www.microsoft.com/japan/msdn/asp.net/tips/upload/]]
これで文化的で最低限のことはできます。

以下、拡張子チェックをつけたサンプル。
#highlight(vb.net){{

Dim MyExtension

'ファイルの拡張子を取得
MyExtension = System.IO.Path.GetExtension(FileUpload1.FileName).ToUpper

'添付ファイル（画像）名の拡張子を調べて Case の場合：処理を継続↓　（Case でない場合：Case Else の所へジャンプ）
Select Case System.IO.Path.GetExtension(MyExtension)
	Case ".BMP", ".DIB", ".JPG", ".JPEG", ".GIF", ".PNG", ".PDF", ".TIF" ' ←アップロード可能な拡張子（ファイル）はここで指定
		'画像を保存
		FileUpload1.SaveAs("c:\" + FileUpload1.FileName)
		Response.Write("画像を保存しました")
	Case Else   ' 拡張子が、Case に該当しない時の処理
		Response.Write("画像を選択してください")
	Return
End Select

}}

*&this_page()　

**概要
ページの説明
[[マイクロソフトの解説>>http://www.microsoft.com/japan/msdn/asp.net/tips/upload/]]
これで文化的で最低限のことはできます。


以下、拡張子チェックをつけたサンプル。
#highlight(vb.net){{

Dim MyExtension

'ファイルの拡張子を取得
MyExtension = System.IO.Path.GetExtension(FileUpload1.FileName).ToUpper

'添付ファイル（画像）名の拡張子を調べて Case の場合：処理を継続↓　（Case でない場合：Case Else の所へジャンプ）
Select Case System.IO.Path.GetExtension(MyExtension)
	Case ".BMP", ".DIB", ".JPG", ".JPEG", ".GIF", ".PNG", ".PDF", ".TIF" ' ←アップロード可能な拡張子（ファイル）はここで指定
		'画像を保存
		FileUpload1.SaveAs("c:\" + FileUpload1.FileName)
		Response.Write("画像を保存しました")
	Case Else   ' 拡張子が、Case に該当しない時の処理
		Response.Write("画像を選択してください")
	Return
End Select

}}