VBScript ошибка синтаксиса Функция

Question

Я поднял следующий код из потока здесь DateDiff in days, hours and mins

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

Function TimeSpan(dt1, dt2) 

     seconds = Abs(DateDiff("S",dt1, dt2)) 
     minutes = seconds \ 60 
     hours = minutes \ 60 
     minutes = minutes mod 60 
     seconds = seconds mod 60 

     if len(hours) = 1 then hours = "0" & hours 

     TimeSpan = hours & ":" & _ 
      RIGHT("00" & minutes, 2) & ":" & _ 
      RIGHT("00" & seconds, 2) 

End Function 

dt1 = ActiveRequest.Fields("CreationDate").Value 
dt2 = ActiveRequest.Fields("1stcontactdatetime").Value 

Ошибка я получаю это: "Ошибка в управляющем сценарии в строке 1: ошибка синтаксиса (Microsoft VBScript ошибка компиляции): FuntionTimeSpan (dt1, dt2)"

Любые советы будут оценены, особенно если это поможет мне не делать этого снова!

Answer 1

Сделайте его sub или определите возвращаемую переменную.

Хотя мой движок vbscript не против вашего кода.

Возможно, вы используете msscript.ocx (MS Script Control), он запускает vbscripts в приложении. Возможно, файл справки в system32 для него.

Timespan - это класс в среде .NET.

Последнее, что если использовать блок управления редактированием, как это делают блокноты и диалоги, вы получаете проблемы с персонажем. Вставьте в текстовый блок (на основе элемента управления редактированием richtext), чтобы вы могли проверить игнорирование элементов управления форматированием.

В сообщении об ошибке VBScript считает, что между функцией и именем функции нет пробела.