<%@ Page Language="VB" ContentType="text/html" %> <% Dim FileForm As String = Request.Form("DNULFileForm") 'アップロードファイルのフォーム要素名 Dim SaveFolder As String = Request.Form("DNULSaveFolder") '保存先フォルダ(実体パス) Dim FormNameAry As String = Request.Form("DNULFormNameAry") '全フォーム要素名の羅列 Dim POSTTarget As String = Request.Form("DNULPOSTTarget") '再ポスト先URL 'Response.Write(FormNameAry) Response.Write(FileSaveSubmit(FileForm, SaveFolder, FormNameAry, POSTTarget)) %>