2016-03-10 122 views
-1

我有成千上万种不同的尺寸,需要使用经典的.asp从英尺和英寸转换成英寸。如何使用经典的.asp将英尺和英寸转换为英寸

大小被列在下面的格式:

 
[width] x [height] 

的宽度和高度被示为具有“标记,其代表脚和”,它代表英寸马克

例如,取下面,并将其转换为英寸:

 
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 

有时候,有一个尾随“的尽头,那里应该是英寸,但有没有上市。例如:

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

我在猜测我需要用表达式创建某种自定义函数,但只是很难找出它。

我试图创建下面的函数,但它仅输出

'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 

任何指针将理解测试大小我创建,5' ×4' 。

+0

是的,用几个表达式创建函数并让它做它的工作 –

+0

如果你很难告诉我们你到目前为止有什么,我们会尝试填充空白。 – Lankymart

+0

好的。我只是在上面添加了一些示例代码。仍然坚持如何有效地解析它。 – Stfrancis

回答

-1

您需要搜索字符串中的X,然后使用字符串拆分函数。

如果存在开始将事物拆分为宽度和高度的情况,您可以在X上进行拆分。然后,您应该能够分开单引号,使用* 12转换脚并将其添加到英寸。

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

+0

感谢您的评论。这是我能找到的最接近的东西,但对于我想要完成的事情来说似乎相当复杂: http://www.xtremevbtalk.com/excel/310996-text-parsing-splitting-string-feet-inches.html – Stfrancis