Ich werd einfach noch wahnsinnig. Ich hab mir jetzt aus verschiedenen
Quellen diesen Code zusammengebastelt. Aber egal, wie ichs mache, immer
bekomm ich beim Update einen Fehler zurück. Da muss es doch was geben, wie
man das einfach zurück in die DB schreiben kann:
<%@ Page Language="VB" ContentType="text/html" ResponseEncoding="iso-8859-1"
%>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDB" %>
<script src="System/Functionen/GetDSN.vb" runat="server"></script> <script
runat="server">
Sub Page_Load(Src As Object, E As EventArgs)
Dim SELECT_STRING As String =
"SELECT * FROM Blog"
Dim connect_string =
GetDSN("Container")
Dim myConn As New
OleDBConnection(connect_string)
Dim myAdapter As New
OleDbDataAdapter(SELECT_STRING, myConn)
Dim myTable As New
DataTable()
Dim myRow As
DataRow
Dim myBuilder As
OleDBCommandBuilder
myAdapter.Fill(myTable)
'----------------------------------------------
myTable.Rows(0)("Titel") =
"Newname"
'----------------------------------------------
myTable.Rows(1).Delete()
'----------------------------------------------
myRow = myTable.NewRow()
myRow("Titel") =
"Das ist neu"
myRow("Inhalt") =
"<b>NeuerInhalt</script<b>"
myTable.Rows.Add(myRow)
'----------------------------------------------
myBuilder = New
OleDBCommandBuilder(myAdapter)
myAdapter.Update(myTable) ' ####HIER TRITT DER FEHLER
AUF!!!!!!#####
' Dynamische SQL-Generierung wird für UpdateCommand gegen
einen SelectCommand,
' der keine Spalteninformationen zurückgibt, nicht
unterstützt.
' Beschreibung: Beim Ausführen der aktuellen Webanforderung
ist ein
' unverarbeiteter Fehler aufgetreten.
' Überprüfen Sie die Stapelüberwachung, um weitere
Informationen über diesen
' Fehler anzuzeigen und festzustellen, wo der Fehler im Code
verursacht wurde.
'
' Ausnahmedetails: System.InvalidOperationException:
' Dynamische SQL-Generierung wird für UpdateCommand gegen
einen SelectCommand,
' der keine Spalteninformationen zurückgibt, nicht
unterstützt.
'
' Quellfehler:
'
'
' Zeile 29:
' Zeile 30: myBuilder=new OleDBCommandBuilder(myAdapter)
' Zeile 31: myAdapter.Update(myTable)
##############<<<<<Fehler>>>>>>##########
' Zeile 32:
' Zeile 33: End Sub
End Sub
</script>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html;
charset=iso-8859-1" />
<title>Das ist eine Testseite</title>
</head>
<body>
Das ist ein Testinhalt
</body>
</html>
_______________________________________________
Asp.net Mailingliste, Postings senden an:
[email protected]
An-/Abmeldung und Suchfunktion unter:
http://www.glengamoi.com/mailman/listinfo/asp.net
