Преобразовать время к ##:##:## и создать что то типа frame

[ALX_2002]

Привет всем..., а особенно skiperski ! . Кто знает расскажиет мне плиз 2 вещи:

1) Как преобразовать время к формату ##:##:## ?
2) Какой элемент можно юзать как FRAME в VB. Т.е напихать на него элементов, а потом двигать их всех вместею ?



P.S Больше всего надеюсь на skiperski !
Во умный чел... Мне б так.

[skiperski]

Во-первых, указывай где исполняется скрипт на сервере или клиенте. С клиентскими скриптами я не работал, потому второй вопрос оставляем открытым.

По первому вопросу: что значит время? Это переменная типа Date? или число? или строка? или ...?

В VBScript, к сожалению, отсутствует функция Format(). Есть, правда, FormatDateTime(), но она форматирует только в предопределённые форматы. Параметры можешь посмотреть в Object Browser (F2).

Для произвольного форматирования придётся писать свои функции. Вот пример, например:

Код: Выделить всё

<%@ Language=VBScript%>
<%
Option Explicit

Function LZero(ByVal s, ByVal n)
'leading zero
   If (Len(s) < n) Then
      LZero = Right(String(n - Len(s),"0") & s, n)
   Else
      LZero = CStr(s)
   End If
End Function

Function FormatTime(ByVal t)
   Dim h, m, s

   h = Hour(t)
   m = Minute(t)
   s = Second(t)

   FormatTime = LZero(h, 2) & ":" & LZero(m, 2) & ":" & LZero(s, 2)
End Function

Response.Write "test LZero<br>"
Response.Write LZero("1", 2) & "<br>"
Response.Write LZero("12", 2) & "<br>"
Response.Write LZero("123", 2) & "<br>"

Response.Write "test FormatTime<br>"
Response.Write FormatTime(Now) & "<br>"

%>


[FaKk2]

Ко второму вопросу:
Предлагается использовать контейнер <div>

[ALX_2002]

2 skiperski - Хм... Вот и я именно так же и сделал. Но я всё таки надеялся на что то типа Format(), но раз её нет, то буду ковыряться с
FormatDateTime, мож и правда она сработает.
2 FAKK2 - Хм.... Ща попробуем.. спасиб !

Ух.... дядьки спасиб - пойду тестить.

[skiperski]

буду ковыряться с FormatDateTime, мож и правда она сработает.

Конкчно сработает, но будет зависеть от региональных настроек конкретного контупера

Код: Выделить всё

Const vbLongTime = 3
Const vbShortTime = 4

?FormatDateTime(now, vbShortTime)
18:36
?FormatDateTime(now, vbLongTime)
18:36:00


Например в Италии разделитель не двоеточие, а точка. Ну, а об американском формате времени и так все знают.

[FaKk2]

skiperski
У тебя появился поклонник.......

[ALX_2002]

2 skiperski: Во ! Рулез ! Кажись то чё нужно ! Ура ! А я то мучался без хелпушника ( систему форматнул недавно и всю потёр) !
Клас ! Спасиб ! Ща переделаю !
2 FAKK2 : Ну можно сказать и так - Ведь этот человек дал болшинство ответов на мои вопры, так что у меня есть причины уважать его
Я лично завидую его знаниям белой завистью.