mastudio 从晚上获取表格

OBJECT wxCOMMON aCommon
{
	aCommon.Background[]= , background_menu.bmp
}

OBJECT wxDATASOURCE aSource
{
	private:
	aSource.Database= HTTP
	aSource.Server= "http://www.masuite.com/sample/sample.htm"
	aSource.Port= 80
	aSource.Method= "Get"
}

OBJECT wxQUERY aQuery
{
	aQuery.wxDATASOURCE= aSource
	aQuery.Url= "http://www.masuite.com/sample/get_grid.asp"
	aQuery.Begin= "<table.+?>"
	aQuery.End= "</table>"
	
	aQuery.Lex= "<tr.+?>.+?<td.+?>(.+?)</td>.+?<td.+?>(.+?)</td>.+?<td.+?>(.+?)</td>.+?</tr>"
	
	aQuery.Split= 9
	aQuery.Page= 1
}

OBJECT wxGRID aGrid
{
	aGrid.wxCAPTION= aCaption
	aGrid.wxCOLUMN= aColumn
	aGrid.wxSECTION= aSection
	
	aGrid.wxQUERY= aQuery
	aGrid.wxCURSOR= aCursor
	
	aGrid.Banna[]= 0, 0xFF0000, 0xEEAAEE
	aGrid.Pen[]= 1, 0x000000
	aGrid.Rect[]= 5%,20%,95%,100%
	
	aGrid.Prompt[]= 80%, 75%, 10%, 15%, 0xC0C0C0
}

OBJECT wxCAPTION aCaption
{
	aCaption.Titlel= "演示获取网页表格内容"
	aCaption.Font[]= 18,0xFFFFFF
	aCaption.Align= left
	aCaption.Height= 9%
	aCaption.Background= 0xff6068
}

OBJECT wxCOLUMN aColumn
{
	aColumn.Count= 3
	aColumn.Height= 0
	
	aColumn.Field[]= "名称", "数量", "金额"
	aColumn.Width[]= 60%, 15%, 15%
	aColumn.Font[]= 14, 0x2042ff
	aColumn.Align[]= center, center, center, center
	//aColumn.Color[]= 0xFF0000, 0x00FF00
	aColumn.Background= 0x3ce7e9
}

OBJECT wxSECTION aSection
{
	REM aSection.Background= 0xffBBCC
	aSection.Font[]= 14, 0x000000
	aSection.Align[]= left, left, right, right, right
	//aSection.Dyestuff= 3
}

OBJECT wxCURSOR aCursor
{
	aCursor.Kind= 1
	aCursor.Pen[]= 10, 0xFFDDEE
	aCursor.Color= 0xEEFFDD
}