Как изменить 1 000 000,00 на 1 000 000,00 с помощью ASP classic? - PullRequest
1 голос
/ 01 июня 2019

Я хочу изменить число 1,000,000.00 на 1.000.000,00 с ASP classic.Пожалуйста, помогите

a=1000000
response.write formatnumber(a,0)

Показывает

1,000,000

Ответы [ 2 ]

0 голосов
/ 01 июня 2019

Спасибо за помощь.

Я добавляю функцию strreverse () в ваш пример. Открытая функция

Public Function Format(sValue, sMask)
    Dim iPlaceHolder
    Dim sTempValue
    Dim sResult

    sTempValue = CStr(strreverse(sValue))
    sResult = sMask
    Do Until InStr(sResult, "#") = 0
        iPlaceHolder = InStr(sResult, "#")
        sResult = Replace(sResult, "#", Left(sTempValue, 1), 1, 1)
        sTempValue = Mid(sTempValue, 2)
        If Len(sTempValue) = 0 Then sResult = Left(sResult, iPlaceHolder)
    Loop
    Format = strreverse(sResult)
End Function

формат response.write (a, "###. ###. ###. ###. ### ") &", 00 "

вывод: 1.000.000,00

0 голосов
/ 01 июня 2019

Нет прямого способа сделать это, потому что используемый разделитель зависит от региональных настроек компьютера.См. здесь для получения дополнительной информации о функции FormatNumber и ее использовании.

Существует обходной путь.Вы можете использовать десятичные точки и отключить группировку следующим образом:

a=1000000
response.write(FormatNumber(a,2,,,0))

Затем вы можете вставить предпочитаемый разделитель, используя свою собственную функцию: см. Этот пример .

...