'System.NotSupportedException'

[Kenneth Windish]

I have been developing an application for several months now, but suddenly I
am getting the following error when I try debugging the application

An unhandled exception of type 'System.NotSupportedException' occurred in
SmartDeviceApplication4.exe

the execution of the application stops at
InitializeComponent()

Any Ideas??



Ken

 

[Tim Wilson]

You may be running into an issue that is outlined in the FAQ
(http://msdn.microsoft.com/smartclient/community/cffaq/cf10.aspx) with an
entry titled "I have a Smart Device form with a lot of controls. Why do I
get a "NotSupportedException" at runtime?".

 

[Guest]

You're hitting the 64K JIT maximum.

http://msdn.microsoft.com/smartclient/understanding/netcf/FAQ/default.aspx#4.10

-Chris

 

[Kenneth Windish]

I read the article, and I deleted all tabs execpt the start tab, which has
only handful of contols. tried to debug and got the same error message.

Any other ideas??

 

[Alex Feinman [MVP]]

How big is your InitializeComponents() (how many lines?)

 

[Kenneth Windish]

Probably about 300 lines on the modified form, with the majority being menu
items.

I probably need to redesign the project and use several forms,just been
resisting that idea due to laziesness.

I just deleted several menu items, and all is well again, except for having
to redesign the forms.

Thanks to all for your help

ken

 

[rojpogi]

vb.net windows CE

Unhandled exception of type 'system.notsupportedexception' occured in EMR2K.exe

i have been develop my application in vb.net pocketPC and now im going to transfer it to windows CE but i get this error when i debug the program.. it stop in the CALL SaveData()..

please help me! i dont know what to do.


Private Sub btnCompute_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCompute.Click
Dim cls As New clsDA
Dim cl As clsFields
Dim ds As DataSet
If IsNumeric(txtPrsRdng.Text) = False Then
MsgBox("Please Enter Present Reading!!", MsgBoxStyle.Exclamation, "SYSTEM MESSAGE")
Exit Sub
End If
If IsNumeric(TextBox1.Text) = False Then
MsgBox("Please Enter Demand Value", MsgBoxStyle.Exclamation, "SYSTEM MESSAGE")
Exit Sub
End If
Call SaveData()
End Sub




Private Sub SaveData()
Try
Cursor.Current = Cursors.WaitCursor
Dim cls As New clsDA
Dim cl As clsFields
Dim msg
Dim cmDS As DataSet
Dim Ttxt As String
cmDS = cls.Qry_Consumer("TRX_Account_No='" & lblAcct.Text & "'", "", 5)
Trx_KWH_Used = CDbl(lblPrvRdng.Text) - CDbl(txtPrsRdng.Text)
etc.........