asp虛擬貨幣
Ⅰ asp 裡面 如何正常顯示貨幣數值
<%
function formatMoney(m)
m = formatNumber(m, 2)
if m > 0 and m < 1
if left(m, 1) <> "0" then tmp = "0" & m
else
tmp = "" & m
end if
formatMoney = tmp
end function
'顯示的時候這樣調用
m = .1
response.write(formatMoney(m))
%>
Ⅱ asp 要將貨幣類型的欄位total讀到的數據轉大寫怎麼寫請各位大狹指點。跪求
轉換大小寫金額的ASP代碼
文件名 atoc.asp
<%
dim a '要轉換成大寫的金額
dim atoc '轉換之後的值
Dim String1 '如下定義
Dim String2 '如下定義
Dim String3 '從原A值中取出的值
Dim I '循環變數
Dim J 'A的值乘以100的字元串長度
Dim Ch1 '數字的漢語讀法
Dim Ch2 '數字位的漢字讀法
Dim nZero '用來計算連續的零值是幾個
String1 = "零壹貳叄肆伍陸柒捌玖"
String2 = "萬仟佰拾億仟佰拾萬仟佰拾元角分"
nZero = 0
If InStr(1, CStr(a * 100), ".") <> 0 Then
err.Raise 5000, , "此函數( AtoC() )只能轉換小數點後有兩位以內的數！"
End If
J = Len(CStr(a * 100))
String2 = Right(String2, J) '取出對應位數的STRING2的值
For I = 1 To J
String3 = Mid(a * 100, I, 1) '取出需轉換的某一位的值
If I <> (J - 3) + 1 And I <> (J - 7) + 1 And I <> (J - 11) + 1 And I <>(J - 15) + 1 Then
If String3 = 0 Then
Ch1 = ""
Ch2 = ""
nZero = nZero + 1
ElseIf String3 <> 0 And nZero <> 0 Then
Ch1 = "零" & Mid(String1, clng(String3) + 1, 1)
Ch2 = Mid(String2, I, 1)
nZero = 0
Else
Ch1 = Mid(String1, clng(String3) + 1, 1)
Ch2 = Mid(String2, I, 1)
nZero = 0
End If
Else '該位是萬億，億，萬，元位等關鍵位
If String3 <> 0 And nZero <> 0 Then
Ch1 = "零" & Mid(String1, clng(String3) + 1, 1)
Ch2 = Mid(String2, I, 1)
nZero = 0
ElseIf String3 <> 0 And nZero = 0 Then
Ch1 = Mid(String1, clng(String3) + 1, 1)
Ch2 = Mid(String2, I, 1)
nZero = 0
ElseIf String3 = 0 And nZero >= 3 Then
Ch1 = ""
Ch2 = ""
nZero = nZero + 1
Else
Ch1 = ""
Ch2 = Mid(String2, I, 1)
nZero = nZero + 1
End If
If I = (J - 11) + 1 Or I = (J - 3) + 1 Then '如果該位是億位或元位，則必須寫上
Ch2 = Mid(String2, I, 1)
End If
End If
AtoC = AtoC & Ch1 & Ch2
If I = J And String3 = 0 Then '最後一位（分）為0時，加上"整"
AtoC = AtoC & "整"
End If
Next
if a=0 then
atoc="零元整"
end if
%>
把以上代碼存為：atoc.asp
調用方法：<!--#include file="atoc.asp"-->
<%
a=要轉換的小寫人民幣數
%>
<%=AtoC%> 輸出大寫人民幣數
網上收集的，我使用多次。很好用
Ⅲ ASP中「貨幣類型變數「加什麼符號
還是一樣：username='"&字元串類型變數&"'
只要是變數的話就是這種寫法
Ⅳ asp 貨幣格式怎麼寫入資料庫
我記得就是數字類型的
直接寫 不用單引號
把他當數字對待
Ⅳ 比如 我帳戶有10元幣 一天扣一個的ASP代碼怎麼寫呢`
int money=10 //錢
while（money>0）
{
money - = 1;
}
Ⅵ ASP中判斷數據為貨幣型的判斷語句。
沒有專門判斷是否為貨幣的函數，也沒必要，因為貨幣就是數字，用IsNumeric判斷是否為數字就可以了。
Ⅶ ASP調用貨幣類型欄位時.怎麼寫才能原樣顯示￥10.00
response.write format(10,"￥0.00")
Ⅷ ASP怎樣用代碼調用貨幣的完整數字顯示
如果只是要顯示前面的0，那就這樣寫：FormatNumber(rs("APrice"),2,-1)
如果資料庫里的是貨幣類型，就這樣寫：FormatCurrency(rs("APrice"))
Ⅸ ASP 插入 貨幣
ACCESS 資料庫里的欄位選擇 貨幣型 或是雙精度型 按照數字類型操作就可以了 注意不要用 int() 等取整函數.
Ⅹ asp中貨幣變數的格式化問題
<%
response.Write((FormatCurrency("￥0.060",2,-1,-1,-1)))
%>
FormatCurrency 函數
返回表達式，此表達式已被格式化為貨幣值（使用系統控制面板中定義的貨幣符號）。
FormatCurrency(
expression[,NumDigitsAfterDecimal [,IncludeLeadingDigit [,UseParensForNegativeNumbers [,GroupDigits]]]]
)
參數
Expression
必選項。要被格式化的表達式。
NumDigitsAfterDecimal
可選項。指示小數點右側顯示位數的數值。默認值為 -1，指示使用的是計算機的區域設置。
IncludeLeadingDigit
可選項。三態常數，指示是否顯示小數值小數點前面的零。有關數值，請參閱「設置」部分。
UseParensForNegativeNumbers
可選項。三態常數，指示是否將負值置於括弧中。有關數值，請參閱「設置」部分。
GroupDigits
可選項。三態常數，指示是否使用計算機區域設置中指定的數字分組符號將數字分組。有關數值，請參閱「設置」部分。
設置
IncludeLeadingDigit、UseParensForNegativeNumbers 和 GroupDigits 參數可以有以下值：
常數 值 描述
TristateTrue -1 True
TristateFalse 0 False
TristateUseDefault -2 使用計算機區域設置中的設置。