זה הפונקציה שכתבתי בVB.NET עם ASP.NET

קוד:

 

<%@page language="VB" Debug="true" %>
<%@ Import Namespace =system.data %>
<%@ Import Namespace="System.Data.OleDb" %>
<script runat="server">
Dim dbconn As IDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & server.mappath("users.mdb") & ";")
 
Function MyInsert (ByVal password1 As String) As Integer
dbconn.Open()
 
 
Dim SQL = " INSERT INTO users (password) "
SQL= SQL & " VALUES ('" & password1 & "')"
 
Dim dbCommand As IDbCommand = New OleDbCommand(SQL,dbconn)
 
Dim rowsAffected As Integer = 0
''Try
rowsAffected = dbCommand.ExecuteNonQuery
response.write(rowsAffected)
''Catch Exc as Exception
''Finally
dbconn.Close
''End Try
Return rowsAffected
End Function
Sub NewRec_Click(sender As Object, e As EventArgs)
if Page.IsValid then
If MyInsert(password2.text) > 0 Then
Label1.Text = " הנתונים נשמרו בהצלחה"
 
else
Label1.Text ="error" 
end if
End If
End Sub 
 
</script>
 

המסד נתונים עובד טוב ויש עמודה בשם password (מסומן בכחול) בטבלה בתוך המסד!
גם הפקד textbox הוא עם " id="password2 שזה לא הבעיה
ובכל זאת הקוד נראה טוב אבל הוא יוצר שגיאה זאת
https://2006-uploaded.fresh.co.il/2...03/38384771.gif


תודה לעוזרים!!

כפי שנאמר בעבר, זה לא פורום תמיכה ב-asp, php, VB או כל שפה אחרת חוץ מ-SQL או מסדי נתונים.
"תדפיס" את השאילתה כפי שהיא נשלחת למסד נתונים (את הפלט הסופי, ללא הצגת המשתנים, כיון שהמשתנים הינם משתני VB, לא משתני SQL) ונוכל לעזור יותר