怎么用hta绘制一个界面可以输入多个变量并传递给vbs脚本？

[晒月亮的pan]

vbs脚本变量用inputbox一个个输太麻烦了，想整一个界面方便点，目前只会写点vbs，hta比较容易理解，比较急，求助大神！ 比如简单点发送邮件vbs脚本，我已经实现了，但想要已经界面几行分别输入发生地址，用户密码等等，每一行前面是变量名，后面是输入框，最后有一个确定按钮点击就可以将输入值分别传递给vbs中相应变量

[X-i-n]

<input id='id'>
<input id='pass'>
<input id='btn' onclick='abc()' type='button' value='click'>
<script language="vbscript">
sub abc()
  dim id, pass
	id= document.getElementById("id").value
	pass = document.getElementById("pass").value
	msgbox id & vbcrlf & pass
end sub
</script>