PDA

View Full Version : سوال: اتصال به بانک sql از طریق کدنویسی



farhad85
شنبه 28 بهمن 1391, 16:52 عصر
سلام بردوستان عزیز:
من یه بانک با خودsql express وی بی نت 2010 ساختم ومیخوام از طریق کدنویسی جوری به بانک متصل بشم که هروقت نرم افزارمو خواستن نصب کنن بطوردلخواه به هرآدرسی که خواستن نصب کنن وبه بانکم هم متصل بشه

hosseinbarnamenevis
شنبه 28 بهمن 1391, 21:42 عصر
Dim inbank As New clsbank With {.name = txtnamebank.Text, .code = Val(txtcode.Text),
.tell = Val(txttell.Text), .tozihat = txttozihat.Text}
'................................................. ................
Dim connbank As New SqlConnection
connbank.ConnectionString = cnnstr()
'................................................. ................
Dim combank As New SqlCommand("INSERT INTO tblbank(itm_name,itm_code,itm_tell,itm_address) VALUES(N'" & inbank.name & "','" & inbank.code & "','" & inbank.tell & "',N'" & inbank.tozihat & "')", connbank)
'................................................. ................
If connbank.State = ConnectionState.Closed Then
connbank.Open()
End If
'................................................. ................
combank.ExecuteNonQuery()




cnnstr = " Data Source=.\SQLEXPRESS;AttachDbFilename=" & CurDir() & "\datashop.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True"