Aggiunta di una colonna ad una grid di un form ASPX tramite plugin

' Il seguente frammento di codice mostra come aggiungere una colonna ad una grid di un form ASPX
' Va inserito nello "Script Creazione" della grid o di altro oggetto del form
' Nello specifico, lo script aggiunge alla griglia DOMANDE del form SCQUEST.ASPX una colonna contenente una combobox che attinge dalla causale parametrizzabile ISTAG
dim form as SCQUESTFORM=this.page

if not form.isPostback
   dim g as QWWebControls.QWWebGrid=ctype(form.findcontrol2("DOMANDE"),QWWebControls.QWWebGrid)

   ' Definisce la colonna per il tag
   Dim col As Infragistics.WebUI.UltraWebGrid.UltraGridColumn = New Infragistics.WebUI.UltraWebGrid.UltraGridColumn
   col.Key = "TAG"
   col.BaseColumnName = "TAG"
   col.Width = New System.Web.UI.webControls.Unit(100)
   col.HeaderText = "Tag"
   col.HTMLEncodeContent = False
   col.Type = Infragistics.WebUI.UltraWebGrid.ColumnType.DropDownList
   g.Columns.insert(3, col)

   dim q as new QWTable
   q.database=form.form_state.dmd_ref.DB
   q.sql="select DESCRIZION from CAUSPAR where CODICE like 'ISTAG%' and CODICE<>'ISTAG' order by 1"
   q.requestlive=false
   q.active=true

   q.rowset.first()

   col.ValueList.ValueListItems.Add("","")
   While Not q.rowset.endofset
    col.ValueList.ValueListItems.Add(q.rowset.fields("DESCRIZION").value, q.rowset.fields("DESCRIZION").value)
    q.rowset.Next()
   End While

   q.active=false

   g.refresh()
end if