cgi4upld.bas

加入一个用VB编写CGI的VB源程序。（你需要在Win98上首先安装20Personal WebServer

Attribute VB_Name = "cgi4upld"
Option Explicit
'-----------------------------------------------
'CGI4upld File upload
'Author : Kevin O'Brien [[e-mail]]
'                       [[e-mail]]
'Version 1.1 (September 1997)
'Requires CGI4VB.BAS and CGI4RTN.BAS
'-----------------------------------------------
'
'Warning!
'--------
'This is an exercise in handling multipart headers.
'I myself would never make my own PC available for
'anonymous file uploads, and I assume you won't either.
'
'The dangers, I hope, are obvious.
'See: http://www-genome.wi.mit.edu/WWW/faqs/www-security-faq.html
'
'Use it as an educational tool, and not as an opportunity
'to shoot yourself in the foot.
'----------
'Attention!
'----------
'Voici un exercise pour manier les "multipart headers".
'Moi, je n'ouvrirais jamais mon propre ordinateur pour permettre
'les inconnus