Frage : DataBinding: „System.Data.Common.DataRecordInternal“ enthält nicht ein Eigentum mit dem Namens„IdKeuze“.

Hallo gefallen alle, das

I morgens ziemlich neu zu diesem programmierenmaterial so tragen mit me.
On, das meine Seite (overzichtpnnr.aspx) es ein searchbox gibt, das des gridview.
When eins Klickens auf „einzeln aufführt“ vom gridview füllt, ein detailview erschließen sollte und es dort ist, dass ich die folgende Störung erhalte --> DataBinding: „System.Data.Common.DataRecordInternal“ enthält nicht ein Eigentum mit dem Namens„IdKeuze“.
In das „detailsview“ dort ist ein DropDownList, das durch eine Tabelle (tblKeuzelijst) von einem accessdb (dbVerzuim) bevölkert wird wenn es leer ist und wenn jemand ganz gebrauchsfertig ein choise, das es mit dem Resultat von einer anderen Tabelle (tblVerzuim) von der gleichen Datenbank aufgefüllt hat. Ich denke die Problemlügen mit den Eigenschaften des DropDownList, weil, wenn ich es zu einer area per informazioni ändere, sie oben mit dem Resultat von tblVerzuim.

Here ist der Code vom aspx page.

1 füllt:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
6:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:
75:
76:
77:
78:
79:
80:
81:
82:
83:
84:
85:
86:
87:
88:
89:
90:
91:
92:
93:
94:
95:
96:
97:
98:
99:
100:
101:
102:
103:
104:
105:
106:
107:
108:
109:
110:
111:
112:
113:
114:
115:
116:
117:
118:
119:
120:
121:
122:
123:
124:
125:
126:
127:
128:
129:
130:
131:
132:
133:
134:
135:
136:
137:
138:
139:
140:
141:
142:
143:
144:
145:
146:
147:
148:
149:
150:
151:
152:
153:
154:
155:
156:
157:
158:
159:
160:
161:
162:
163:
164:
165:
166:
167:
168:
169:
170:
171:
172:
173:
174:
175:
176:
177:
178:
179:
180:
181:
182:
183:
184:
185:
186:
187:
188:
189:
190:
191:
192:
193:
194:
195:
196:
197:
198:
199:
200:
201:
202:
203:
204:
205:
206:
207:
208:
209:
210:
211:
212:
213:
214:
215:
216:
217:
218:
219:
220:
221:
222:
223:
224:
225:
226:
227:
228:
229:
230:
231:
232:
233:
234:
235:
236:
237:
238:
239:
240:
241:
242:
243:
244:
245:
246:
247:
248:
<%@ Seite Language= " VB " MasterPageFile= " ~/MasterControle.master " AutoEventWireup= " falsch "
    CodeFile= " overzichtpnnr.aspx.vb " Inherits= " overzichtpnnr " Title= " Verzuim Limburg - Beheerders Menü - Overzicht OPP-nr " %>

<%@ Register Assembly= " AjaxControlToolkit " Namespace= " AjaxControlToolkit " TagPrefix= " ajaxToolkit " %>

    
    Beheerders:
        Overzicht actieve ziekteperiodes OPpersoneelsnummer

* *
  * * * * * * *                  

 


And hier ist der Code vom vb file

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
6:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:
75:
76:
77:
78:
79:
80:
81:
82:
83:
84:
85:
86:
87:
88:
89:
90:
91:
92:
93:
94:
95:
96:
97:
98:
99:
100:
101:
102:
103:
104:
105:
106:
107:
108:
109:
110:
111:
112:
113:
114:
115:
116:
117:
118:
119:
120:
121:
122:
123:
124:
125:
126:
127:
128:
129:
130:
131:
132:
133:
134:
135:
136:
137:
138:
139:
140:
141:
142:
143:
144:
145:
146:
147:
148:
149:
150:
151:
152:
153:
154:
155:
156:
157:
158:
159:
160:
161:
162:
163:
164:
165:
166:
167:
168:
169:
170:
171:
172:
173:
174:
175:
176:
177:
178:
179:
180:
181:
182:
183:
184:
185:
186:
187:
188:
189:
190:
191:
192:
193:
194:
195:
196:
197:
198:
199:
200:
201:
202:
203:
204:
205:
206:
207:
208:
209:
210:
211:
212:
213:
214:
215:
216:
217:
218:
219:
220:
221:
222:
223:
224:
225:
226:
227:
228:
229:
230:
231:
232:
233:
234:
235:
236:
237:
238:
239:
240:
241:
242:
243:
244:
245:
246:
247:
248:
249:
250:
251:
252:
253:
254:
255:
256:
257:
258:
259:
260:
261:
262:
263:
264:
265:
266:
267:
268:
269:
270:
271:
272:
273:
274:
275:
Imports System.Data.OleDb

Teilweises Kategorie overzichtpnnr
    Übernimmt System.Web.UI.Page

    Geschütztes VorBtnzoek_Click (ByVal Absender als Gegenstand, ByVal e als System.EventArgs) behandelt btnzoek. Klicken


        Schwaches strverzuim als Schnur = System.Configuration.ConfigurationManager.ConnectionStrings („DBverzuimCS“) .ConnectionString
        Schwacher Anschl. als neues OleDbConnection (strverzuim)
        Schwaches cm als neues OleDbCommand
        cm.CommandText = „AUSERWÄHLTES tblverzuim. Identifikation, tblverzuim.datumvan, tblverzuim.datumtot, tblverzuim.datumziekteattest, [IGPNNR] u. „„u. RTrim ([IGVRNM]) u.““ u. RTrim ([IGNAAM]) ALS Naam, tblverzuim.controle, tblverzuim.datumcontrole, tblverzuim.controleannulatie, tblverzuim.opmerkingen, tblverzuim.datumingave, tblverzuim.resultaatcontrole " _
                        u. „VON INNEREM tblPersoneelAS400 tblverzuim AUF sich ANSCHLIESSEN tblPersoneelAS400.IGPNNR = tblverzuim.pnnr“ _
                        u. „WO tblPersoneelAS400.IGPNNR=? UND tblverzuim.wissen=False“ _
                        u. „GRUPPE DURCH tblverzuim. Identifikation, tblverzuim.datumvan, tblverzuim.datumtot, tblverzuim.datumziekteattest, [IGPNNR] u. „„u. RTrim ([IGVRNM]) u.““ u. RTrim ([IGNAAM]), tblverzuim.controle, tblverzuim.datumcontrole, tblverzuim.controleannulatie, tblverzuim.opmerkingen, tblverzuim.datumingave, tblverzuim.resultaatcontrole " _
                        u. „AUFTRAG DURCH tblverzuim.datumvan DESC, tblverzuim.datumtot DESC; “
        Schwaches p2 als neues OleDbParameter
        p2.ParameterName = „pnnr“
        p2.OleDbType = OleDbType.Double
        p2.Value = Me.txt pnnrzoek. Text

        cm. Anschluss = Anschl.
        cm. Connection.Open ()
        cm. Parameters.Add (p2)
        Me.dgOverzicht.DataSource = cm.ExecuteReader ()
        Me.dgOverzicht.DataBind ()

        Me.lblok.Visible = falsch
        Me.btnexcel.Visible = richten aus

        cm. Connection.Close ()
        cm. Parameters.Clear ()


    Enden-Unterseeboot

    '' Kleur De rijen sterben vandaag gemaakt zijn groen u. rijen sterben vandaag verlopen zijn Kreuz. Hier Wort geselecteerd OP Kolom „datumingave“ uit de Tabel „tblVerzuim“ van DbVerzuim
    Geschütztes VordgOverzicht_RowDataBound (ByVal Absender als Gegenstand, ByVal e als System.Web.UI.WebControls.GridViewRowEventArgs) behandelt dgOverzicht.RowDataBound
        Wenn e.Row.RowType = DataControlRowType.DataRow dann
            Schwach als Schnur = DataBinder.Eval (e.Row.DataItem, „datumingave“ groen)
            Kreuz als Schnur = DataBinder.Eval (e.Row.DataItem, „datumtot“ verdunkeln)
            Wenn groen = heute dann
                e.Row.ForeColor = Drawing.Color.Green
            Beenden wenn
            Wenn Kreuz = heute dann
                e.Row.ForeColor = Drawing.Color.Red
            Beenden wenn
        Beenden wenn
    Unterseeboot beenden

    Allgemeines Vor dgOverzicht_SelectedIndexChanged (ByVal Absender als Gegenstand, ByVal e als System.EventArgs) behandelt dgOverzicht.SelectedIndexChanged

        Schwaches strverzuim als Schnur = System.Configuration.ConfigurationManager.ConnectionStrings („DBverzuimCS“) .ConnectionString
        Schwacher Anschl. als neues OleDbConnection (strverzuim)
        Schwaches cm als neues OleDbCommand
        cm.CommandText = „AUSERWÄHLTES tblverzuim.datumvan, tblverzuim.datumtot, tblverzuim.datumziekteattest, tblverzuim.pnnr, tblverzuim.wissen, tblverzuim.opmerkingen, tblverzuim. Identifikation, tblverzuim.controle, tblverzuim.datumcontrole, tblverzuim.controleannulatie, tblverzuim.useringave, tblverzuim.datumingave, tblverzuim.userannulatiecontrole, tblverzuim.datumannulatiecontrole, tblverzuim.userwissen, tblverzuim.datumwissen, tblverzuim.usergewijzigd, tblverzuim.datumgewijzigd, tblverzuim.resultaatcontrole“ _
                        u. „vom tblverzuim“ _
                        u. „WO tblverzuim. Id=? ; “

        Schwaches p1 als neues OleDbParameter
        p1.ParameterName = „Identifikation“
        p1.OleDbType = OleDbType.Double
        p1.Value = C (Me.dgOverzicht.SelectedRow.FindControl („lblid“), Aufkleber). Text

        cm. Anschluss = Anschl.
        cm. Connection.Open ()
        cm. Parameters.Add (p1)
        Me.DetailsView1.DataSource = cm.ExecuteReader
        Me.DetailsView1.DataBind ()

        cm. Connection.Close ()
        cm. Parameters.Clear ()

        '' hier Packwagen Resultaat Controle zich mee Vultde Dropdownlist OP
        Schwaches Ctrl als Steuerung
        Ctrl = DetailsView1.FindControl („drpResultaatControle“)
        Wenn nicht Ctrl nichts dann ist
            Schwaches mylistbox als DropDownList = DirectCast (Ctrl, DropDownList)
            Wenn nicht mylistbox nichts dann ist
                'die sQl-Frage vorbereiten
                sqlCmd verdunkeln, wie Schnur = „AUSERWÄHLTES tblkeuzelijst.IdKeuze, tblKeuzelijst.keuzemogelijkheden vom tblKeuzelijst“

                VulListbox (mylistbox, sqlCmd)
            Beenden wenn
        Beenden wenn

    Unterseeboot beenden

    Privates VorVulListbox (ByVal lstObj als DropDownList, ByVal sqlCmd als Schnur)

        Schwaches p1 als neues OleDbParameter
        Schwaches strverzuim als Schnur = System.Configuration.ConfigurationManager.ConnectionStrings („DBverzuimCS“) .ConnectionString
        Schwacher Anschl. als neues OleDbConnection (strverzuim)
        Schwaches cm als neues OleDbCommand
        cm.CommandText = sqlCmd
        cm. Anschluss = Anschl.
        cm. Connection.Open ()

        lstObj.DataSource = cm.ExecuteReader ()
        lstObj.DataValueField = „IdKeuze“
        lstObj.DataTextField = „keuzemogelijkheden“
        lstObj.DataBind ()

        'sluit af
        cm. Connection.Close ()
        cm. Parameters.Clear ()

    Enden-Unterseeboot

    Geschütztes VorbtnOpslaan_Click (ByVal Absender als Gegenstand, ByVal e als System.EventArgs)

        Schwaches strverzuim als Schnur = System.Configuration.ConfigurationManager.ConnectionStrings („DBverzuimCS“) .ConnectionString
        Schwacher Anschl. als neues OleDbConnection (strverzuim)
        Schwaches cm als neues OleDbCommand
        cm.CommandText = „UPDATE tblverzuim GESETZT tblverzuim.datumvan =? , tblverzuim.datumtot =? , tblverzuim.datumziekteattest =? , tblverzuim.opmerkingen =? , tblverzuim.usergewijzigd =? , tblverzuim.datumgewijzigd =? , tblverzuim.controle=? , tblverzuim.datumcontrole=? , tblverzuim.resultaatcontrole=?“ _
                        u. „WO (((tblverzuim. Identifikation) =?)); “


        Schwaches p1, p2, p3, p4, p5, p6, p7, p8, p9, p10 als neues OleDbParameter
        p1.ParameterName = „Identifikation“
        p2.ParameterName = „datumvan“
        p3.ParameterName = „datumtot“
        p4.ParameterName = „datumattest“
        p5.ParameterName = „opmerkingen“
        p6.ParameterName = „usergewijzigd“
        p7.ParameterName = „datumgewijzigd“
        p8.ParameterName = „controlejanee“
        p9.ParameterName = „datumcontrole“
        p10.ParameterName = „resultaatcontrole“

        p1.OleDbType = OleDbType.Double
        p2.OleDbType = OleDbType.Date
        p3.OleDbType = OleDbType.Date
        p4.OleDbType = OleDbType.Date
        p5.OleDbType = OleDbType.Char
        p6.OleDbType = OleDbType.Char
        p7.OleDbType = OleDbType.Date
        p8.OleDbType = OleDbType.Boolean
        p9.OleDbType = OleDbType.Date
        p10.OleDbType = OleDbType.Char

        p1.Value = C (Me.DetailsView1.FindControl („lblid“), Aufkleber). Text
        p2.Value = C (Me.DetailsView1.FindControl („txtdatumvan“), area per informazioni). Text
        p3.Value = C (Me.DetailsView1.FindControl („txtdatumtot“), area per informazioni). Text
        p4.Value = C (Me.DetailsView1.FindControl („txtdatumziekteattest“), area per informazioni). Text
        p5.Value = C (Me.DetailsView1.FindControl („txtopmerkingen“), area per informazioni). Text
        p6.Value = User.Identity.Name
        p7.Value = System.DateTime.Now
        p8.Value = C (Me.DetailsView1.FindControl („slkcontrole“), CheckBox). Überprüft
        p9.Value = C (Me.DetailsView1.FindControl („txtcontrole“), area per informazioni). Text
        p10.Value = C (Me.DetailsView1.FindControl („drpResultaatControle“), DropDownList) .SelectedValue


        cm. Anschluss = Anschl.
        cm. Connection.Open ()
        cm. Parameters.Add (p2)
        cm. Parameters.Add (p3)
        cm. Parameters.Add (p4)
        cm. Parameters.Add (p5)
        cm. Parameters.Add (p6)
        cm. Parameters.Add (p7)
        cm. Parameters.Add (p8)
        cm. Parameters.Add (p9)
        cm. Parameters.Add (p10)
        cm. Parameters.Add (p1)

        cm.ExecuteNonQuery ()

        cm. Connection.Close ()
        cm. Parameters.Clear ()

        Me.lblok.Visible = richten aus
        Me.DetailsView1.DataSource = nichts
        Me.DetailsView1.DataBind ()
        Me.dgOverzicht.DataSource = nichts
        Me.dgOverzicht.DataBind ()
    Enden-Unterseeboot

    Geschütztes VorbtnWissen_Click (ByVal Absender als Gegenstand, ByVal e als System.EventArgs)
        Schwaches strverzuim als Schnur = System.Configuration.ConfigurationManager.ConnectionStrings („DBverzuimCS“) .ConnectionString
        Schwacher Anschl. als neues OleDbConnection (strverzuim)
        Schwaches cm als neues OleDbCommand
        cm.CommandText = „UPDATE tblverzuim GESETZT tblverzuim.wissen = -1, tblverzuim.userwissen =? , tblverzuim.datumwissen =?“ _
                        u. „WO (((tblverzuim. Identifikation) =?)); “
        Schwaches p1, p2, p3 als neues OleDbParameter
        p1.ParameterName = „Identifikation“
        p2.ParameterName = „userwissen“
        p3.ParameterName = „datumwissen“
        p2.OleDbType = OleDbType.Char
        p3.OleDbType = OleDbType.Date
        p1.OleDbType = OleDbType.Double
        p1.Value = C (Me.DetailsView1.FindControl („lblid“), Aufkleber). Text
        p2.Value = User.Identity.Name
        p3.Value = System.DateTime.Now

        cm. Anschluss = Anschl.
        cm. Connection.Open ()
        cm. Parameters.Add (p2)
        cm. Parameters.Add (p3)
        cm. Parameters.Add (p1)
        cm.ExecuteNonQuery ()
        cm. Connection.Close ()
        cm. Parameters.Clear ()

        Me.lblok.Visible = richten aus
        Me.DetailsView1.DataSource = nichts
        Me.DetailsView1.DataBind ()
        Me.dgOverzicht.DataSource = nichts
        Me.dgOverzicht.DataBind ()
    Enden-Unterseeboot

    Geschütztes Vorbtnannulatiecontrole_Click (ByVal Absender als Gegenstand, ByVal e als System.EventArgs)
        Schwaches strverzuim als Schnur = System.Configuration.ConfigurationManager.ConnectionStrings („DBverzuimCS“) .ConnectionString
        Schwacher Anschl. als neues OleDbConnection (strverzuim)
        Schwaches cm als neues OleDbCommand
        cm.CommandText = „UPDATE tblverzuim GESETZT tblverzuim.controleannulatie = -1, tblverzuim.userannulatiecontrole =? , tblverzuim.datumannulatiecontrole =?“ _
                        u. „WO (((tblverzuim. Identifikation) =?)); “
        Schwaches p1, p2, p3 als neues OleDbParameter
        p1.ParameterName = „Identifikation“
        p2.ParameterName = „userwissen“
        p3.ParameterName = „datumwissen“
        p2.OleDbType = OleDbType.Char
        p3.OleDbType = OleDbType.Date
        p1.OleDbType = OleDbType.Double
        p1.Value = C (Me.DetailsView1.FindControl („lblid“), Aufkleber). Text
        p2.Value = User.Identity.Name
        p3.Value = System.DateTime.Now

        cm. Anschluss = Anschl.
        cm. Connection.Open ()
        cm. Parameters.Add (p2)
        cm. Parameters.Add (p3)
        cm. Parameters.Add (p1)
        cm.ExecuteNonQuery ()
        cm. Connection.Close ()
        cm. Parameters.Clear ()

        Me.lblok.Visible = richten aus
        Me.DetailsView1.DataSource = nichts
        Me.DetailsView1.DataBind ()
        Me.dgOverzicht.DataSource = nichts
        Me.dgOverzicht.DataBind ()

    Enden-Unterseeboot

    Geschütztes Vorbtnexcel_Click (ByVal Absender als Gegenstand, ByVal e als System.EventArgs) behandelt btnexcel. Klicken
        Schwaches Sb als neues System.Text.StringBuilder
        Schwaches rij als ganze Zahl
        'Schwaches kolom als ganze Zahl
        Schwacher Dateiname als Schnur
        Dateiname = „verzuim.txt“


        Sb. Hinzufügen („pnnr/Naam“ u. Chr (9) u. „Ziekte Packwagen“ u. Chr (9) u. „Ziekte Tot“ u. Chr (9) u. „Datum ziekteattest“ u. Chr (9) u. „controle“ u. Chr (9) u. „Datum controle“ u. Chr (9) u. „annulatie controle“ u. Chr (9) u. „opmerkingen“ u. vbCrLf)
        Für rij = 0 zu Me.dgOverzicht.Rows.Count - 1
            Me.dgOverzicht.SelectedIndex = rij
            'gegevens uit gridview meenemen
            Sb. Hinzufügen (C (Me.dgOverzicht.SelectedRow.FindControl („lblpnnr“), Aufkleber). Text u. Chr (9))
            Sb. Hinzufügen (C (Me.dgOverzicht.SelectedRow.FindControl („lbldatumvan“), Aufkleber). Text u. Chr (9))
            Sb. Hinzufügen (C (Me.dgOverzicht.SelectedRow.FindControl („lbldatumtot“), Aufkleber). Text u. Chr (9))
            Sb. Hinzufügen (C (Me.dgOverzicht.SelectedRow.FindControl („lbldatumziekteattest“), Aufkleber). Text u. Chr (9))
            Sb. Hinzufügen (C (Me.dgOverzicht.SelectedRow.FindControl („slkcontrole“), CheckBox). Überprüft u. Chr (9))
            Sb. Hinzufügen (C (Me.dgOverzicht.SelectedRow.FindControl („lbldatumcontrole“), Aufkleber). Text u. Chr (9))
            Sb. Hinzufügen (C (Me.dgOverzicht.SelectedRow.FindControl („slkcontroleannulatie“), CheckBox). Überprüft u. Chr (9))
            Sb. Hinzufügen (C (Me.dgOverzicht.SelectedRow.FindControl („txtopmerkingen“), area per informazioni). Text u. vbCrLf)

        Zunächst

        Response.ContentType = „Application/x-msexcel“
        Response.AddHeader („Inhalteinteilung“, „attachement; filename= """ u. Dateiname u. """")

        Response.Write (sb.ToString)
        Response.End ()
    Enden-Unterseeboot
Enden-Kategorie


I Hoffnung, der ich genügende Informationen zur Verfügung gestellt habe und die dort jemand ist, die me.

p.s.i bereits geschautem arround für die gleiche Frage über EE helfen kann, aber alle sie sagen, dass das Feld nicht im auserwählten querry ist. aber, wenn Sie meine vb Akte überprüfen, sehen Sie, dass auf Linie 81 ich das Feld „IdKeuze“ in der auserwählten Frage habe. Wie ich sagte, dass am Anfang ich zu this.

Thanks im Voraus Tom De Bie
wirklich neu bin

Antwort : DataBinding: „System.Data.Common.DataRecordInternal“ enthält nicht ein Eigentum mit dem Namens„IdKeuze“.

Herausgefunden, dass Sie alle URL zum External URL des sharepoint webapp ändern müssen, bearbeitet der SQL-Berichtsbediener und dann gutes. Ich verwendete dieses als Hinweis - > http://tjopsta.net/2010/04/16/how-to-change-team-foundation-server-2010-urls-for-use-externally/#comment-44
Weitere Lösungen  
 
programming4us programming4us