6行のコードはコンポーネントなしでアップロードを実現します。（author:stimson）
原理コード:
strefileName=Request.QueryString(file 1)Set objStream=Server.Create Object(「ADODB.Stream」)objStream.Type=1'adType BinaryObjStream.OpenobjStream.LoadomFistream.Loadomfiream Fistreamonweb.gif")，2使用方法：上のコードをupload.aspと書いてブラウザの中で入力します。http://XXX/upload.asp?file1=c:\アップロードファイル\1234.gif XXXはあなたのホストアドレスのために実行し終わったら、あなたのディレクトリの下に123_が多くなりました。onweb.gif彼はあなたのファイルを要求しています。原理によって、下記のコードを拡張できます。
＜form name=「FORM」action=「uplad.asp」method=「post」>up.aspファイル
<%Function GetFileName(ByVal strefile)If strefile<>“”The nGetFileName=mid(strele，Instrev)「\」＋1）ElseGetFileName=「」End IfEfEnd functitionstFileName=Request.Form(「file 1」)Set objStream=Server.CreatObjjjjjjjjjjjjjeeeeeeeeeoStream(「ADODB.Stream」)oStream.Tscscscscscream.TjjjjjSteream.TttttttttttttttttttttttttttttttttttttttGereameeeeeeeeezzzzzzzzzzzz私（strefile Name）は、2 objStream.Close%のローカルデバッグに成功しました。C/Sモードは通過しません。
strefileName=Request.QueryString(file 1)Set objStream=Server.Create Object(「ADODB.Stream」)objStream.Type=1'adType BinaryObjStream.OpenobjStream.LoadomFistream.Loadomfiream Fistreamonweb.gif")，2使用方法：上のコードをupload.aspと書いてブラウザの中で入力します。http://XXX/upload.asp?file1=c:\アップロードファイル\1234.gif XXXはあなたのホストアドレスのために実行し終わったら、あなたのディレクトリの下に123_が多くなりました。onweb.gif彼はあなたのファイルを要求しています。原理によって、下記のコードを拡張できます。
＜form name=「FORM」action=「uplad.asp」method=「post」>up.aspファイル
<%Function GetFileName(ByVal strefile)If strefile<>“”The nGetFileName=mid(strele，Instrev)「\」＋1）ElseGetFileName=「」End IfEfEnd functitionstFileName=Request.Form(「file 1」)Set objStream=Server.CreatObjjjjjjjjjjjjjeeeeeeeeeoStream(「ADODB.Stream」)oStream.Tscscscscscream.TjjjjjSteream.TttttttttttttttttttttttttttttttttttttttGereameeeeeeeeezzzzzzzzzzzz私（strefile Name）は、2 objStream.Close%のローカルデバッグに成功しました。C/Sモードは通過しません。