Sub Atualped
Dim SQLStr As String="SELECT [taborig] as Item, [sabor] as Sabor, [qtd] As qtd, [preco] as preco FROM tempped ORDER BY ordem ASC"
WebView1.LoadHtml(DBUtils.ExecuteHtml( Starter.sql2, SQLStr, Null, 0, True))
WebView1.ZoomEnabled=False
.
.
.