【发布时间】:2014-03-13 13:44:55
【问题描述】:
您好,我正在尝试向我的用户表中插入数据,并在 ASPNETDB 中创建一个用户我的代码如下:
Dim conn As SqlConnection
Dim cmd As SqlCommand
Dim recordsAffected As Integer
Dim cmdstring As String = "INSERT INTO User(Staff_No, First_Name, Surname, Position_Held, Email, Telephone_Number, Location_Code) Values(@StaffNo,@First,@Surname,@Role,@Email,@Telephone,@Location)"
conn = New SqlConnection("Data Source=.\SQLEXPRESS;AttachDbFilename=|DataDirectory|\Database.mdf;Integrated Security=True;User Instance=True")
cmd = New SqlCommand(cmdstring, conn)
cmd.Parameters.Add("@StaffNo", SqlDbType.Int).Value = TxtUsername.Text
cmd.Parameters.Add("@First", SqlDbType.NChar).Value = TxtFirstName.Text
cmd.Parameters.Add("@Surname", SqlDbType.NChar).Value = TxtSurname.Text
cmd.Parameters.Add("@Role", SqlDbType.NChar).Value = TxtRole.Text
cmd.Parameters.Add("@Email", SqlDbType.NChar).Value = TxtEmail.Text
cmd.Parameters.Add("@Telephone", SqlDbType.NChar).Value = TxtTelephone.Text
cmd.Parameters.Add("@Location", SqlDbType.NChar).Value = DdlLocation.SelectedItem.Text.ToString
conn.Open()
recordsAffected = cmd.ExecuteNonQuery
conn.Close()
Try
Membership.CreateUser(TxtUsername.Text, TxtPassword.Text)
lblResult.Text = "Successfully created user " & TxtUsername.Text
Catch ex As Exception
lblResult.Text = "Error" & ex.ToString
End Try
End Sub
异常出现在关键字“用户”附近的语法不正确我检查了我的数据库并且所有值都相同非常感谢任何帮助
【问题讨论】:
标签: asp.net database vb.net forms