ماژول برای حذف یک رکورد ازبانک SQL

[RHA_65]

با عرض سلام خدمت استادان گرامی
این ماژول رو برای حذف کردن یه رکورد از DataBase نوشتم اما نمی تونم مشکلشو پیدا کنم لطفا کمکم کنید.........خیلی بهش نیاز دارم...چند تا ماژول دیگه برای درج و جستجو باید بنویسم.....
***********اولین باره دارم ماژول می نویسم*******************




Imports System.Data
Imports System.Data.SqlClient
Module DBCommands
Dim con As New SqlConnection("Data Source=RHA\SATRIANI;Initial Catalog=Amlak;Integrated Security=True")
Dim da As New SqlDataAdapter
Dim cmd As New SqlCommand
Dim ds As New DataSet
Public Function Exe_Select(ByRef tablename As String) As DataSet
da.SelectCommand = New SqlCommand
da.SelectCommand.Connection = con
da.SelectCommand.CommandText = "Select * from " & tablename & ""
con.Open()
da.Fill(ds, "tablename")
con.Close()
Return ds
End Function
Public Function Exe_delete(ByRef tablename As String, ByRef fieldname As String, ByRef x As String) As Boolean
cmd.Connection = con
cmd.CommandType = CommandType.Text
cmd.CommandText = "Delete from " & tablename & " where " & fieldname & "=" + x
con.Open()
Try
cmd.ExecuteNonQuery()
con.Close()
Return True
Catch ex As Exception
Return False
End Try
End Function
End Module

[MahmoudiNik]

سلام
تو کد که فکر نکم مشکل داشته باشه اما دستور sqlرو که برای پاک کردن استفاده می کنی یه بار به صورت رشته بریز تو textboxو بعد تو query analizer (درست نوشتم؟)امتحان کن ببن جواب می ده ضمنا:
"Delete from " & tablename & " where " & fieldname & "=" + x
اون آخر جایه x "'" تک کوتیشن رو دستی بذار

[alimanam]

با سلام

دوست عزیز نوع X رو از نوع Object انتخاب کن مشکلت حل میشه .

دلیل : به این دلیل که fieldname به عنوان متغیر مشخص شده پس نمی دونین که Type اون از چه نوعیه به همین دلیل نوع اون رو object انتخاب کنین تا تقریباً همه رو پوشش داده باشید .

یا علی