<% Query = "" Query = Query & " " Query = Query & " SELECT * " Query = Query & " FROM TDAˆ×‘ÖƒŒ�[ƒgM " Query = Query & " WHERE ƒVƒXƒeƒ€CD = '" & GB_SystemCD & "' " Query = Query & " AND ‰‰�KCD = '" & GB_EnshuCD & "' " Query = Query & " ORDER BY ’ʉÝCD " Set Content = OpenQuery(Query) Do While Not(Content.BOF Or Content.EOF) %> <% Content.MoveNext Loop %> ’Ê‰Ý ƒŒ�[ƒg(‰~) ŠO‰Ý ‰~ <% = Content.Fields("–¼�Ì") %> <% = ConvIntToMoney("" & Content.Fields("‹àŠz") , false, false) %> " value="<% = Content.Fields("‹àŠz") %>"> " size="9" onKeyup="FormStrFloat(this,7,0);" onKeypress="FormStrFloat(this,7,0);" onBlur="FormStrFloatEdge(this,7,0,true);FormStrFloatCutoff(this);" onFocus="FormStrCommaReplace(this);" class="tbox7" value=""> <% = Content.Fields("’PˆÊ") %>  ');"> Š·ŽZ" onClick="YenToGaika('<% = Content.Fields("’ʉÝCD") %>');">  " size="12" onKeyup="FormStrFloat(this,10,0);" onKeypress="FormStrFloat(this,10,0);" onBlur="FormStrFloatEdge(this,7,0,true);FormStrFloatCutoff(this);" onFocus="FormStrCommaReplace(this);" class="tbox7" value=""> ‰~