如果我还爱你珍珠免费:asp函数应用大家帮我看看啊!!

来源:百度文库 编辑:高考问答 时间:2024/05/14 12:13:29
function DoDateTime(str, nNamedFormat, nLCID)
dim strRet
dim nOldLCID

strRet = str
If (nLCID > -1) Then
oldLCID = Session.LCID
End If

On Error Resume Next

If (nLCID > -1) Then
Session.LCID = nLCID
End If

If ((nLCID < 0) Or (Session.LCID = nLCID)) Then
strRet = FormatDateTime(str, nNamedFormat)
End If

If (nLCID > -1) Then
Session.LCID = oldLCID
End If

DoDateTime = strRet
End Function
我想让用这个函数得到的时间和当前时间比较.如果和当前日期相等就显示图片,如果不相等就相识用这个函数得到的时间啊,我给如何实现啊!!

if strRet = time() then
显示图片
else
DoDateTime = strRet
end if

这不就行了吗??我不太明白你的意思