把所有的连字符 "+" 改成 "&" 就ok了
去掉结束符 ";" face = face_1+"-"+face_2+"-"+face_3+".gif";
show_file = '<img src='+face+'>';->face = face_1 & "-" & face_2 & "-" & face_3  & ".gif";
show_file = '<img src=' & face & '>';

解决方案 »

  1.   

    the statements shown above is invalid:
    1. ";" at tht end of line is invalid in VBScript
    2. 's in VBScript are comments, you need to put them in ""face_1 = document.form1.Career.value
    face_2 = document.form1.Sex.value
    face_3 = document.form1.Face.value
    face = face_1 & "-"  & face_2 & "-" & face_3 & ".gif"
    show_file = "<img src='" & face & "'>"
    document.all.show.innerHTML=show_file
      

  2.   

    最接近Java的语法是:
    face_1 = document.form1.Career.value
    face_2 = document.form1.Sex.value
    face_3 = document.form1.Face.value
    face = face_1+"-"+face_2+"-"+face_3+".gif"
    show_file = "<img src=" + face + ">"
    document.all.show.innerHTML=show_fileVBScript特色语法是:
    face_1 = document.form1.Career.value
    face_2 = document.form1.Sex.value
    face_3 = document.form1.Face.value
    face = face_1 & "-" & face_2 & "-" & face_3 & ".gif"
    show_file = "<img src=" & face & ">"
    document.all.show.innerHTML=show_file另外,需要把<script>元素做如下改动。(以下script元素中的代码是我改写的你的程序,完成相同目的。下面的办法是我做相同事情的习惯做法,供你参考。)
    <script language="VBScript" type="text/VBScript">
      Set tSourObject=document.form1
      Set tDestObject=document.all.show
      Sub SetFormValue(pSourObject,pDestObject)
        'pSourObject Form元素对象。
        'pDestObject 图片容器
        tFace_1 = CStr(pObject.Career.value)
        tFace_2 = CStr(pObject.Sex.value)
        tFace_3 = CStr(pObject.Face.value)
        tFaceSrc = face_1 & "-" & face_2 & "-" & face_3 & ".gif"
        Set NewElement=document.createElement("IMG")
        NewElement.src=tFaceSrc
        pDestObject.insertAdjacentElement("beforeEnd",NewElement)
      End Sub
    </script>