一个比较棘手vbs post数据的问题，请指教

[seani]

现有三个文件
A.asp，B.vbs,C.asp
A.asp里包含了B.vbs，调用B.vbs里的方法，通过B.vbs传参数到C.asp里，代码如下：
A.asp
<script language=vbscript src="B.vbs"></script>
<script language=vbscript>
sub doselcxqx
dim k,s
if AB(formedit.cxqx.value,k,s) then
formedit.cxqx.value=k
formedit.txtcxqx.value=s
end if
end sub
</script>

B.vbs

function AB(RYBHLB,retRYBHLB,retRYXMLB)
dim k
k=showModalDialog("C.asp?rybhlb="&RYBHLB,"","dialogWidth:510px;status:no;dialogHeight:360px")
if k<>"" then
retRYBHLB=left(k,instr(k,"_")-1)
retRYXMLB=mid(k,instr(k,"_")+1)
AB=true
else
AB=false
end if
end function

因为从B.vbs传参数过C.asp，参数值过长，超出范围，所以想在B.vbs文件改成传值Post方式，一直没找到好的方法，请各位帮忙解决下此问题，谢谢

[Dogfish]

打开窗口，这个是一个简单的form来的，从parent里拿要post的数据填回form里，自动提交到c.asp