51Testing软件测试论坛

标题: 参数化后，如何在数据末尾加入空格 [打印本页]

作者: iotest 时间: 2012-8-21 16:54
标题: 参数化后，如何在数据末尾加入空格
Browser("xxxxxx系统").Page("xxx页面").Frame("Frame_2").WebEdit("promoter.mobile").Set DataTable("p_Text", dtLocalSheet)
---------------------------------------------------------------------------------------------------
各位大神，参数化数据，在数据表里，数据的最后面好像没法加入空格，但使用常量的话，是可加入空格的。是否有办法通过语句加入空格？求解~~~

作者: iotest 时间: 2012-8-21 17:26
或者检查对象末尾有空格，如何忽略空格？

作者: xjwldlover 时间: 2012-8-21 18:18
给数据加一个特殊标记，比如 abc_1
其中_1代表数据后面的空格数，在提取数据的时候处理一下数据，让他变成“abc ”,这样应该就可以了吧

转换 Left(str,InStrRev(str,"_")-1) & String(Mid(str,InStrRev(str,"_")+1,Len(str))," ")

作者: shingo0109 时间: 2012-8-22 09:38
如果要去掉两边的空格的话，直接用Trim函数就可以了，如Trim(" abc ")，实际输出为"abc"

作者: iotest 时间: 2012-8-22 09:58
回复 3# xjwldlover
感谢回复，在下菜鸟，是否能说的更仔细一些了，不胜感激。
我参数化后，列表名是“p_Text”，但是列表里的数据最后没法加上空格。你说的那句是放在设定句的前面还是后面？要怎么写？

作者: iotest 时间: 2012-8-22 10:01
回复 4# shingo0109
感谢回复，在下菜鸟，是否能说的更仔细一些了，不胜感激。被检查的对象末尾有空格，是WEBTABLE的数据，要忽略别检查对象的末尾空格，具体如何写呢？

作者: shingo0109 时间: 2012-8-22 10:07
回复 6# iotest

假设 sCellData = Browser().Page().WebTable().GetCellData(1,1)，如果sCellData = "abc "，最后有一个空格的，检查的代码可以这样写：
If Trim(sCellData) = "abc" Then
Reporter.ReportEvent micPass, "pass", "pass"
End If

作者: xjwldlover 时间: 2012-8-22 10:15
比如你的数据如
p_Text(列名)
"abc "
"bds"
"ttt "
原来通过DataTable("p_Text", dtLocalSheet)取出来可能是“abc”,后面空格丢失了。你在存数据的时候可以将数据存成以下形式，_n，n代表空格的数量
p_Text(列名)
"abc_1"
"bds"
"ttt_2"
建立一个function
function getDataTable(ColName,tbName)
str = DataTable("p_Text", tbName)
' 处理空格，将_n转为n个空格
getDataTable = Left(str,InStrRev(str,"_")-1) & String(Mid(str,InStrRev(str,"_")+1,Len(str))," ")
end function
这样，当你取值时就变成
Browser("系统").Page("页面").Frame("框架").WebEdit("编辑").Set getDataTable("p_Text", dtLocalSheet)

不知道你是否是想实现这样的效果~

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)