質問編集履歴
1
前括弧の削除漏れのため、該当ソースコードを修正
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -4,7 +4,7 @@
|
|
|
4
4
|
②登録後に、（普通なら一覧ページ（Index.vbhtml）に遷移するところを）編集ページ（Edit.vbhtml）へ遷移し、
|
|
5
5
|
かつ、登録した内容も反映（既に各フォームに入力されている）状態にしたい。
|
|
6
6
|
|
|
7
|
-
※下記のモデルファイルで定義している、複合主キーである「
|
|
7
|
+
※下記のモデルファイルで定義している、複合主キーである「id」と「itemId」の２つを手がかりに、新規登録後、
|
|
8
8
|
DBから、登録直後のレコードを取得したいのですが、その部分でエラーが発生してしまいます。
|
|
9
9
|
|
|
10
10
|
|
|
@@ -14,7 +14,7 @@
|
|
|
14
14
|
### 発生している問題・エラーメッセージ
|
|
15
15
|
|
|
16
16
|
コントローラファイルの
|
|
17
|
-
「Dim test As Test =
|
|
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 =
|
|
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()
|