restinpiece @ ウィキ 画像のアップロード
※上記の広告は60日以上更新のないWIKIに表示されています。更新することで広告が下部へ移動します。

画像のアップロード


概要

ページの説明
マイクロソフトの解説
これで文化的で最低限のことはできます。


以下、拡張子チェックをつけたサンプル。
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