Runtime Errorarif
|
| Posted: 06/21/2005, 3:20 AM |
|
Hi
Pls help me iam new to ASP
Error Type:
Microsoft VBScript runtime (0x800A000D)
Type mismatch
/misreports/classes/SalesTaxSelection.asp, line 1128
<%If session("levelid") = 1 then ----LINE 1128
renderGroupedDataElement Me, fldSalesTaxDivisionCode, "COMBOBOX", "Division", "BOUND_TABLE", "Code", "Name", "",True
Else
|
|
|
 |
wiseguy
Posts: 6
|
| Posted: 06/21/2005, 3:32 AM |
|
What is renderGroupedDataElement?
|
 |
 |
RUNTIMEERROR
|
| Posted: 06/21/2005, 3:58 AM |
|
it is a function
i cannot post the whole code it exceeds maximum characters
<%Sub renderGroupedDataElementFromQuery(oView, objField, strTargetElement, strSource, strValueColumnName, strDisplayColumnName, strParentField, fFiresOnChangeEvent)
' oView as View
' objField as CField
' strTargetElement as String '["RADIOGROUP" | "LISTBOX" | "COMBOBOX"]
' strSource as String 'BOUND_QUERY: string representing query
' strValueColumnName as String
' strDisplayColumnName as String
' strParentField as String ' specifies which field is this field's parent, so an appropriate filter can be generated
' fFiresOnChangeEvent as Boolean ' specifies that a call-back to the server is required if the selected item changes
Dim rs ' as ADODB.RecordSet
Dim strHTM ' as String
Set rs = executeAccessorSQL(oView, strSource)
strHTM = ""
If (rs Is Nothing) Then
' TODO - implement error handling
Exit Sub
End If
If Not(rs.EOF And rs.BOF) Then
renderGroupedDataElementFromRecordset oView, objField, strTargetElement, rs, strValueColumnName, strDisplayColumnName, strParentField, fFiresOnChangeEvent
Else
%>
<font size="1" color="red"><b>No Account Code for selected series</b></font>
<%
End If
' cache the recordset for the duration of this session
If (Not(rs is Nothing)) Then
Set rs.ActiveConnection = Nothing
End If
Set objField.GroupedDataValues = rs
Set rs = Nothing
End Sub
|
|
|
 |
ATTN:WISEGUY
|
| Posted: 06/21/2005, 4:05 AM |
|
can u give ur mail id
i will send u the code
|
|
|
 |
wiseguy
Posts: 6
|
| Posted: 06/21/2005, 5:25 AM |
|
badnaam@hotmail.com
|
 |
 |
|