teratail header banner
teratail header banner
質問するログイン新規登録

質問編集履歴

1

前括弧の削除漏れのため、該当ソースコードを修正

2020/06/09 11:58

投稿

Eltk
Eltk

スコア51

title CHANGED
File without changes
body CHANGED
@@ -4,7 +4,7 @@
4
4
  ②登録後に、(普通なら一覧ページ(Index.vbhtml)に遷移するところを)編集ページ(Edit.vbhtml)へ遷移し、
5
5
  かつ、登録した内容も反映(既に各フォームに入力されている)状態にしたい。
6
6
 
7
- ※下記のモデルファイルで定義している、複合主キーである「TestId」と「itemId」の2つを手がかりに、新規登録後、
7
+ ※下記のモデルファイルで定義している、複合主キーである「id」と「itemId」の2つを手がかりに、新規登録後、
8
8
  DBから、登録直後のレコードを取得したいのですが、その部分でエラーが発生してしまいます。
9
9
 
10
10
 
@@ -14,7 +14,7 @@
14
14
  ### 発生している問題・エラーメッセージ
15
15
 
16
16
  コントローラファイルの
17
- 「Dim test As Test = (db.Tests.Where(Function(data) data.id = id).Where(Function(data) data.itemId = itemId)」
17
+ 「Dim test As Test = db.Tests.Where(Function(data) data.id = id).Where(Function(data) data.itemId = itemId)」
18
18
  の箇所で以下のエラーが発生
19
19
  ```
20
20
  'System.Data.Entity.Infrastructure.DbQuery`1[MvcApp.Test]' のオブジェクトを型 'MvcApp.Test' にキャストできません。'
@@ -184,7 +184,7 @@
184
184
  If IsNothing(id) Then
185
185
  Return New HttpStatusCodeResult(HttpStatusCode.BadRequest)
186
186
  End If
187
- Dim test As Test = (db.Tests.Where(Function(data) data.id = id).Where(Function(data) data.itemId = itemId)
187
+ Dim test As Test = db.Tests.Where(Function(data) data.id = id).Where(Function(data) data.itemId = itemId)
188
188
 
189
189
  If IsNothing(Test) Then
190
190
  Return HttpNotFound()