Question

我需要使用经典的.asp将数千种不同的尺寸从英尺和英寸转换成英寸。

尺寸以下列格式列出：

[width] x [height]

宽度和高度显示为＆＃39;标记，代表脚和＆＃34;标记为英寸。

例如，采取以下措施并将其转换为英寸：

2'6" x 8' = width = 30; height = 96
9'6" x 13'6" = width = 120; height = 162

有时尺寸中没有X，表明它的形状为圆形或方形。例如：

2'6"

这必须使宽度和高度都相同，所以：

2'6" = width = 30; height = 30

有时会有一个尾随＆＃34;最后，应该有英寸，但没有列出。例如：

5'0" x 8'" = width = 60; height = 96

我猜我需要用表达式创建某种自定义函数，但只是很难搞清楚。

我尝试创建以下函数，但它只输出我创建的测试大小，5＆＃39; x 4＆＃39;

'example source sizes
'5'2" X 4'3"
'4' X 3'
'3'4"
'5'
'23" X 21"
'21"

'then run the function
'idsize = GetInches(rs("size"))
dim idsize
idsize = "5' x 4'"
GetInches(idsize)
Response.Write (idsize)

Function    GetInches(feet_inches)
    dim sizehold 
    feet_inches = split(feet_inches,"X")
    sizehold = split(feet_inches(0),"'")
    feet_inches = sizehold(0)
    feet_inches = replace(feet_inches,chr(34),"")
    feet_inches = replace(feet_inches,"'","")
    feet_inches = trim(feet_inches)
    feet_inches = feet_inches * 12
End Function

任何指针都将不胜感激。

Answer 1

您需要在字符串中搜索X，然后使用字符串拆分功能。

如果存在，您可以拆分X以开始将事物分成宽度和高度。然后你应该能够拆分单引号，使用* 12转换脚并添加到英寸。

请记住，经典的ASP基本上是VB脚本，所以可能有一些代码在谷歌上浮动。

如何使用经典的.asp

1 个答案: