@Code
Dim db = Database.Open("SmallBakery") 
Dim query = "SELECT * FROM Product" 
End Code

<html> 
<body> 
<h1>小型面包店产品</h1> 
<table border="1" width="100%"> 
<tr>
<th>编号</th> 
<th>产品</th> 
<th>描述</th> 
<th>价格</th> 
</tr>
@Code
Dim row
for each row in db.Query(query)
End Code

<tr> 
<td>@row.Id</td> 
<td>@row.Name</td> 
<td>@row.Description</td> 
<td align="right">@row.Price</td> 
</tr> 
@Code next End Code
</table> 
</body> 
</html>