userloginIDのテキストボックスを備えたログインパネルがあります。ログインボタンがクリックされると、データソースはテキストボックス内の値を取得し、userloginIDテキストボックス内の値に応じてフィルタリングされたデータをchklistboxに提供することになっています。
ログインボタンがクリックされたときにのみデータソースをchklistboxに接続しますが、アプリはまだ失敗します。次のメッセージが表示されます。
DbTypeプロパティが設定されている場合、パラメータ'UserLogin'のTypeプロパティは設定できません。説明:現在のWebリクエストの実行中に未処理の例外が発生しました。エラーとエラーがコードのどこで発生したかについての詳細は、スタックトレースを確認してください。
例外の詳細:System.InvalidOperationException:DbTypeプロパティが設定されている場合、パラメーター'UserLogin'のTypeプロパティは設定できません。
ソースエラー:
現在のWebリクエストの実行中に、未処理の例外が生成されました。例外の発生源と場所に関する情報は、以下の例外スタックトレースを使用して識別できます。
スタックトレース:
[InvalidOperationException:DbTypeプロパティが設定されている場合、パラメーター'UserLogin'のTypeプロパティを設定できません。]
System.Web.UI.WebControls.Parameter.GetValue(オブジェクト値、ブール値ignoreNullableTypeChanges)+1751307System.Web.UI.WebControls
。 ParameterCollection.GetValues(HttpContextコンテキスト、コントロールコントロール)+301
System.Web.UI.WebControls.SqlDataSourceView.InitializeParameters(DbCommandコマンド、ParameterCollectionパラメーター、IDictionary ExclusiveList)+264 System.Web.UI.WebControls.SqlDataSourceView.ExecuteSelect(DataSourceSelectArguments引数) +472
System.Web.UI.WebControls.ListControl.OnDataBinding(EventArgs e)+95
System.Web.UI.WebControls.ListControl.PerformSelect() +34
System.Web.UI.WebControls.BaseDataBoundControl.DataBind( )+73 System.Web.UI.WebControls.BaseDataBoundControl.EnsureDataBound()+
82
System.Web.UI.WebControls.BaseDataBoundControl.OnPreRender(EventArgs e)+22 System.Web .UI.WebControls.ListControl.OnPreRender(EventArgs e)+18 System.Web.UI.WebControls.CheckBoxList.OnPreRender(EventArgs e)+20 System.Web.UI.Control.PreRenderRecursiveInternal()+80System.Web.UI
。 Control.PreRenderRecursiveInternal()+171
System.Web.UI.Control.PreRenderRecursiveInternal() +171 System.Web.UI.Control.PreRenderRecursiveInternal
()+171
System.Web.UI.Page.ProcessRequestMain(Boolean includeStagesBeforeAsyncPoint、Boolean includeStagesAfterAsyncPoint)+ 842
ログインボタンのコード(onclick)は次のとおりです。
Protected Sub btnLogin_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnLogin.Click
If btnLogin.Text = "Login" Then
btnLogin.Text = "Logout"
PanelLogin.BackColor = Drawing.Color.LightGreen
Me.CurrentUserLogin = Me.txtUserId.Text
Me.chkLstClientcodes.DataBind()
txtStatus.Text = "Logqed in as Andrew McLintock"
'LoginSuccessInit()
Me.chkLstClientcodes.DataSourceID = "clientcodes"
Else
btnLogin.Text = "Login"
PanelLogin.BackColor = Drawing.Color.LightSalmon
txtStatus.Text = "Not Logged In!!!"
End If
'Me.Page.Controls.Clear()
End
Sub