VB脚本中的烦恼

时间:2012-03-30 19:01:41

标签: asp-classic vbscript

为想要ASP Classic程序的人试图将PHP脚本转移到VB脚本而苦苦挣扎。

这到底是怎么回事?

width = 1008
height = 1260

If width > height Then
 response.write("I am confused")
End If

产生结果;

I am confused

宽度值来自

dimensions = Split(canvas_size,"x")
width = dimensions(0)
height = dimensions(1)

当我把它们写到屏幕上时,这些是我得到的数字。

1 个答案:

答案 0 :(得分:5)

当值为字符串或数字时,以下代码可正常工作。还有一个问题。

width1 = "1008"
height1 = "1260"

msgbox("starting")

If width1 > height1 Then
 msgbox("bad 1")
End If

width2 = 1008
height2 = 1260

If width2 > height2 Then
 msgbox("bad 2")
End If

我的猜测是你没有修剪和/或转换分割值。见这个例子。

dimensions = Split("1008 x 1260","x")
width3 = dimensions(0)
height3 = dimensions(1)

' does NOT work because of the untrimmed value
If width3 > height3 Then
 msgbox("bad 3")
End If

' does work because of the conversion (which takes care of the trimming too)
If cint(width3) > cint(height3) Then
 msgbox("bad 4")
End If