مشکل در برقراری ارتباط با بانک sql

[programerinfonet]

با سلام دوستان عزیز
من یک پروژه با vb.net و بانک sql server2000 دارم می نویسم اما همون موقع Insert خطا می گیره
تصویر خطا :


92085



اینم کدمه


Dim my_cn As New SqlConnection("server=(local);database=profile;integrated security=true;")




Try
my_cn.Open()
Dim my_cmd As New SqlCommand("insert into tblinfo(name,family,fatname,birthdate,idnumber,nat ionalcod,education,job,phone,mobile,address,discri ption)values('" & TextBox1.Text & "','" & TextBox2.Text & "','" & TextBox3.Text & "','" & TextBox4.Text & "','" & TextBox5.Text & "','" & TextBox6.Text & "','" & ComboBox1.Text & "','" & TextBox1.Text & "','" & TextBox1.Text & "','" & TextBox1.Text & "','" & TextBox1.Text & "','" & TextBox1.Text & "',")
my_cmd.Connection = my_cn
my_cmd.ExecuteNonQuery()

Catch ex As Exception
MessageBox.Show(ex.Message)
End Try

[programerinfonet]

دوستان اگه کسی یک پروژه به زبان vb.net و بانک sql داره که چهار عمل اصلی insert delete update select که به درد پروژه دانشجویی بخوره داره واسم بذاره ممنون میشم
من تازه میخوام vb.net رو یاد بگیرم
ممنون

[barnamenevisforme]

سلام
به جای " & TextBox1.Text & " باید عبارت TextBox1.Text رو قرار بدید.
توی سیستم خودتون به این ادرس مراجعه کنید:
Program Files\Microsoft Visual Studio 9.0\Samples\1033\VBSamples\VB Samples\Data Samples
همچنین این لینک به زبانی بسیار ساده مفاهیم رو توضیح داده.
http://www.homeandlearn.co.uk/net/nets12p1.html

[programerinfonet]

دوست هزیز ضمن تشکر اگه من " رو پاک کنم که نوشته ها رشته میشن
که البته شدن

[blackboy]

سلام این یک روش خیلی خوب اتصال به بانک من برات نوشتم انشاا... به دردت بخوره یک فایل ضمیمه هم برات گذاشتم حالشو ببری

Imports System.Data
Imports System.Data.SqlClient
Public Class main
Dim con As New SqlConnection
Dim com As New SqlCommand
Dim da As New SqlDataAdapter
Dim ds As New DataSet
Private Sub main_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
con.ConnectionString = "Data Source=.\sqlexpress;Initial Catalog=kala;Integrated Security=True"
com.Connection = con
da.SelectCommand = com
'----------------------------
com.CommandText = "select * from tbl_kala"
con.Open()
com.ExecuteNonQuery()
con.Close()
da.Fill(ds, "show")
DataGridView1.DataSource = ds.Tables("show")
End Sub

[Hybrid]

سلام دوستان ،

دوست من لطف کنید دستورات SQL رو به صورت پارامتریک بنویسید تا نه وقت با ارزش خودتون و نه وقت مارو تلف کنید ،

یک نوع دستور SQL با استفاده از پارامتر :


DA.InsertCommand.CommandText = "insert into MainTable(p_name,p_fname,p_NP,p_TT,p_ss,p_sz) values(@p_name,@p_fname,@p_NP,@p_TT,@p_ss,@p_sz)"
DA.InsertCommand.Parameters.AddWithValue("@p_name", Name)
DA.InsertCommand.Parameters.AddWithValue("@p_fname", Family)
DA.InsertCommand.Parameters.AddWithValue("@p_NP", FatherName)
DA.InsertCommand.Parameters.AddWithValue("@p_TT", TT)
DA.InsertCommand.Parameters.AddWithValue("@p_ss", SS)
DA.InsertCommand.Parameters.AddWithValue("@p_sz", SZ)

به نظرتون خطایابی این دستور ساده تر هست یا دستور شما ؟ ( در ضمن دستور خودتون رو داخل تگ کد قرار بدین تا کدتون خواناتر باشه )


موفق باشید