Code:
;~~< OCComboBox >~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Dim $OCComboBox
$OCComboBox = $Panel1.Controls.ComboBox()
$OCComboBox.Size = 173, 21
$OCComboBox.SelectedIndex = -1
$OCComboBox.Location = 496, 35

...

	
	$cmdtxt = "select distinct OrgCode from dbo.SDEUserData"
	$cmd.commandtext = $cmdtxt $rs.open($cmd)
	$rs.MoveFirst
	While Not $rs.eof
		$OC = Trim($rs.fields.item("OrgCode").value)
		If $oc > ''
			$OCComboBox.Items.Add($oc)
		EndIf
		$rs.moveNext
	Loop
	$rs.close
$cn.close


The ComboBox REFUSES to add the items, even though I copied the code from another working script... the output goes to the console instead (I have tried just dumping a dumb value and the same thing happens, so it isn't the data (I assume).

I have 2 and they both do the same thing
_________________________
How to ask questions the smart way <-----------> Before you ask