ChristianStettner

Der Fehler tritt zur Laufzeit auf. Der Connectionstring stimmt auch.

Hallo, entschuldigung, wenn es nicht so rüber kommt. ich habe das Query hier untereinander geschrieben. Im Quellcode ist das " & _ das ende der Zeile.

Dim sSQLDUP As String = "SELECT [uNTERNEHMEN].[FIRMA1], [uNTERNEHMEN].[FIRMA2], [uNTERNEHMEN].[sTRASSE], [uNTERNEHMEN].[LKZ], [uNTERNEHMEN].[PLZ], [uNTERNEHMEN].[ORT], [PERSONEN].[ANREDE], [PERSONEN].[TITEL], [PERSONEN].[VORNAME], [PERSONEN].[NACHNAME], [PERSONEN].[email_GESCHAEFTLICH1], [PERSONEN].[TELEFON_GESCHAEFTLICH1], [PERSONEN].[TELEFAX_GESCHAEFTLICH1] " & _ "FROM UNTERNEHMEN INNER JOIN (PERSONEN INNER JOIN (MEDIEN INNER JOIN BEZIEHUNGEN ON [MEDIEN].[MEDIUM_ID] = [bEZIEHUNGEN].[MEDIUM_ID_1]) ON [PERSONEN.PERSON_ID] = [bEZIEHUNGEN.PERSON_ID_1]) ON [uNTERNEHMEN.UN_ID] = [bEZIEHUNGEN.UN_ID_1] " & _ "WHERE(([bEZIEHUNGEN].[KUNDE_ID_1] = " & frmHaupt.KID & ") And ([bEZIEHUNGEN].[bEZIEHUNGSTYP_ID] = 4) And ([MEDIEN].[MEDIUM_ID] = " & MedienID & " ) And ([bEZIEHUNGEN].[FUNKTION_ID_1] = 1) AND ([PERSONEN].[AUSGESCHIEDEN] = 0)) " & _ "GROUP BY [uNTERNEHMEN].[FIRMA1], [uNTERNEHMEN].[FIRMA2], [uNTERNEHMEN].[sTRASSE], [uNTERNEHMEN].[LKZ], [uNTERNEHMEN].[PLZ], [uNTERNEHMEN].[ORT], [PERSONEN].[ANREDE], [PERSONEN].[TITEL], [PERSONEN].[VORNAME], [PERSONEN].[NACHNAME], [PERSONEN].[email_GESCHAEFTLICH1], [PERSONEN].[TELEFON_GESCHAEFTLICH1], [PERSONEN].[TELEFAX_GESCHAEFTLICH1]" Hoffe es ist nun leichter zu lesen. Ich habe es nun mit den eckigen-Klammer versucht, bekomme aber die gleiche Fehlermeldung.

con.Open() Dim sSQLDUP As String = "SELECT (UNTERNEHMEN.FIRMA1), (UNTERNEHMEN.FIRMA2), (UNTERNEHMEN.STRASSE), (UNTERNEHMEN.LKZ), (UNTERNEHMEN.PLZ), (UNTERNEHMEN.ORT), (PERSONEN.ANREDE), (PERSONEN.TITEL), (PERSONEN.VORNAME), (PERSONEN.NACHNAME), (PERSONEN.EMAIL_GESCHAEFTLICH1), (PERSONEN.TELEFON_GESCHAEFTLICH1), (PERSONEN.TELEFAX_GESCHAEFTLICH1) " & _ "FROM UNTERNEHMEN INNER JOIN (PERSONEN INNER JOIN (MEDIEN INNER JOIN BEZIEHUNGEN ON (MEDIEN.MEDIUM_ID) = (BEZIEHUNGEN.MEDIUM_ID_1)) ON (PERSONEN.PERSON_ID) = (BEZIEHUNGEN.PERSON_ID_1)) ON (UNTERNEHMEN.UN_ID) = (BEZIEHUNGEN.UN_ID_1) " & _ "WHERE(((BEZIEHUNGEN.KUNDE_ID_1) = " & frmHaupt.KID & ") And ((BEZIEHUNGEN.BEZIEHUNGSTYP_ID) = 4) And ((MEDIEN.MEDIUM_ID) = " & MedienID & " ) And ((BEZIEHUNGEN.FUNKTION_ID_1) = 1) AND ((PERSONEN.AUSGESCHIEDEN) = 0)) " & _ "GROUP BY (UNTERNEHMEN.FIRMA1), (UNTERNEHMEN.FIRMA2), (UNTERNEHMEN.STRASSE), (UNTERNEHMEN.LKZ), (UNTERNEHMEN.PLZ), (UNTERNEHMEN.ORT), (PERSONEN.ANREDE), (PERSONEN.TITEL), (PERSONEN.VORNAME), (PERSONEN.NACHNAME), (PERSONEN.EMAIL_GESCHAEFTLICH1), (PERSONEN.TELEFON_GESCHAEFTLICH1), (PERSONEN.TELEFAX_GESCHAEFTLICH1)" Dim DRDUP_KuAP As DbDataReader Dim SQLDUP_KuAP As New SqlCommand(sSQLDUP, con) DRDUP_KuAP = SQLDUP_KuAP.ExecuteReader Das ist der Code wo es ausgeführt wird. Danach werden die einzelnen Werte an Variablen übergeben, welche für die weitere Arbeit verwendet werden.

Hallo, ich habe folgende Abfrage gebastelt. SELECT (UNTERNEHMEN.FIRMA1), (UNTERNEHMEN.FIRMA2), (UNTERNEHMEN.STRASSE), (UNTERNEHMEN.LKZ), (UNTERNEHMEN.PLZ), (UNTERNEHMEN.ORT), (PERSONEN.ANREDE), (PERSONEN.TITEL), (PERSONEN.VORNAME), (PERSONEN.NACHNAME), (PERSONEN.EMAIL_GESCHAEFTLICH1), (PERSONEN.TELEFON_GESCHAEFTLICH1), (PERSONEN.TELEFAX_GESCHAEFTLICH1) FROM (UNTERNEHMEN) INNER JOIN ((PERSONEN) INNER JOIN ((MEDIEN) INNER JOIN (BEZIEHUNGEN) ON (MEDIEN.MEDIUM_ID) = (BEZIEHUNGEN.MEDIUM_ID_1)) ON (PERSONEN.PERSON_ID) = (BEZIEHUNGEN.PERSON_ID_1)) ON (UNTERNEHMEN.UN_ID) = (BEZIEHUNGEN.UN_ID_1) WHERE(((BEZIEHUNGEN.KUNDE_ID_1) = 730) And ((BEZIEHUNGEN.BEZIEHUNGSTYP_ID) = 4) And ((MEDIEN.MEDIUM_ID) = 4393 ) And ((BEZIEHUNGEN.FUNKTION_ID_1) = 1) AND ((PERSONEN.AUSGESCHIEDEN) = 0)) GROUP BY (UNTERNEHMEN.FIRMA1), (UNTERNEHMEN.FIRMA2), (UNTERNEHMEN.STRASSE), (UNTERNEHMEN.LKZ), (UNTERNEHMEN.PLZ), (UNTERNEHMEN.ORT), (PERSONEN.ANREDE), (PERSONEN.TITEL), (PERSONEN.VORNAME), (PERSONEN.NACHNAME), (PERSONEN.EMAIL_GESCHAEFTLICH1), (PERSONEN.TELEFON_GESCHAEFTLICH1), (PERSONEN.TELEFAX_GESCHAEFTLICH1) Wenn ich diese Im SQL-Server-Query-Analyzer ausführe, bekomme ich auch meine Ergebnisse. Wenn ich sie im VB-Code ausführen möchte, bekomme ich die Fehlermeldung Ungültiger Objektname 'UNTERNEHMEN'. Ungültiger Objektname 'PERSONEN'. Ungültiger Objektname 'MEDIEN'. Ungültiger Objektname 'BEZIEHUNGEN'. Kann mir jemand sagen, wo der Fehler liegt? Gruß Christian

Hallo, ich habe eine Frage. Ich bin noch recht frisch, was das Programmieren mit VB.Net angeht. Ich will einem Gridview die Feldinhalte so darstellen, dass es wie folgt aussieht: Gattung: AZB Sprich die Spaltenüberschrift soll fett und der Wert normal geschrieben werden. Da ich mehrzeilige Gridview-Rows habe, soll die Überschrift mit in die Zelle eingetragen werden. Ich habe ein Beispiel gefunden, wo das mit HTML-Tags gelöst wurde. da sieht das so aus als Code Dim column As GridViewDataColumn = TryCast(e.CellElement.ColumnInfo, GridViewDataColumn) If column IsNot Nothing AndAlso column.OwnerTemplate.Caption = "Belegungseinheit" Then If column.FieldName = "Gattung_ID" Then e.CellElement.Text = "Gattung: " & e.CellElement.RowInfo.Cells("Gattung_ID").Value End If End If wenn ich dies nun mit meinem Code ausprobiere, dann schreibt mir das Programm die Tags mit in die Spalte. Anzeige im Grid: <html><b>Name</b>: Mustermann, Max Meine Frage nun: Muss ich noch etwas einbinden, damit die Tags umgesetzt werden oder ist diese Lösung so nicht umsetzbar und ich muss mir eine andere Lösung überlegen? Kennt jemand eine alternative Lösung?