<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]