如何用拦截表单的方法上传图片?

 更新时间:2006年11月16日 00:00:00   作者:  

<script language="vbs">
sub send_onclick         
      dim f
      set f=document.ff
      photo=trim(f.photo.value)       
      if photo="" then       
            msgbox "
嘻嘻,还没照片呢!",64 ,"上传"     
            f.photo.focus     
            exit sub     
      end if       
      f.submit     
end sub             
sub retu_onclick
    history.back
end sub
</script>

<form method=POST action=saveedit.asp name=ff enctype=multipart/form-data>
      <input type=file name=photo>
      <input type=button value=
开始上传 name=send>
</form>

[1]

相关文章

最新评论