⑴ 如何用asp實現人民幣小寫轉大寫，要標准點的，比如200，轉成後應該是貳佰圓整
Function money(rmb)
cRmb1="仟佰拾萬仟佰拾億仟佰拾萬仟佰拾元角分"
cRmb2="壹貳叄肆伍陸柒捌玖"
cRmb=TRIM(CSTR(ROUND(Rmb,2)*100))
if right(crmb,1)="0" then
cReChsRmb="整"
nZero=0
else
cReChsRmb=""
nZero=1
end if
FOR i=LEN(cRmb) to 1 step -1
cNum=Mid(cRmb,i,1)
IF Not cNum="0" then
cReChsRmb=Mid(cRmb2,INT(cInt(Mid(cRmb,i,1))),1)+Mid(cRmb1,I-LEN(cRmb)+18,1)+cReChsRmb
nZero=1
ELSE
cChsNum2=Mid(cRmb1,I-LEN(cRmb)+18,1)
if InStr(cChsNum2,"億")>0 and InStr(cChsNum2,"萬")>0 and InStr(cChsNum2,"元")>0 then
if cChsNum2="億" and LEFT(cReChsRmb,2)="萬" then
cReChsRmb=cChsNum2+SUBSTRC(cReChsRmb,2)
else
cReChsRmb=cChsNum2+cReChsRmb
end if
else
if nZero=1 then
cReChsRmb="零"+cReChsRmb
else
cReChsRmb=cReChsRmb
end if
end if
nZero=0
END IF
next
money=cReChsRmb
end Function
⑵ 誰能給個Windows Vista Enterprise sp1 CHS的可用下載地址
http://bbs.vista123.com/thread-25381-1-1.html
試試看吧
⑶ 求ZWCAD 2009 Chs的授權號
勾使用硬體鎖獲得授權方式注冊，注冊時不要勾網路版!! ZWCAD授權號 86849B67 ACIS 授權號 EA05C492