PDA

View Full Version : کسی می تونه دستور sqlلی این خط فرمان رو بگه



a.maleki
شنبه 08 دی 1386, 16:53 عصر
با عرض سلام خدمت تمامی دوستان
یک سوال داشتم
این خط فرمان برای بانک اطلاعای اکسس نوشته شده حالا من می خواهم بدونم برای sql هم چنین دستور هست یا نه
اگه هست ممنون می شم اگه برام بنویسید
یا اینکه یک نمونه برنامه برام بگذارید بدجوری لنگ این دستورم
خیلی ممنون
ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\db.mdb;Persist Security Info=False"

morteza_261
شنبه 08 دی 1386, 22:40 عصر
سلام
1-لطف کنید از این ببعد کداتون رو تو تگ کد بزارید
2-اینم کد:


"Data Source=" & My.Computer.Name & ";Initial Catalog=PhoneBook;Integrated Security=True"

البته باید یه کم تغییرات روش بدی

Sub Zero
شنبه 08 دی 1386, 23:02 عصر
به سایت زیر یه سری بزن :
www.ConnectionStrings.com (http://www.connectionstrings.com/)

a.maleki
یک شنبه 09 دی 1386, 12:10 عصر
آقایون لطفا به من تازه کار بگید اشکال این کد چی هستش



Dim dataset1 As New DataSet
dataset1 = New DataSet("dataset1")
Dim Connectionstring As String = "workstation id=ABBAS;packet size=4096;integrated security=SSPI;initial catalog=sabtenam;persist security info=False"
Dim connection1 As SqlConnection = New SqlConnection(Connectionstring)
Dim command1 As SqlCommand = New SqlCommand("select * from sabtenam")
Dim sqldataadepter1 As SqlDataAdapter
connection1.Open()
command1.Connection = connection1

روی این خط ، خطا می گیره sqldataadepter1.SelectCommand = command1
sqldataadepter1.Fill(dataset1, "Table_1")
DataGrid1.SetDataBinding(dataset1, "Table_1")
connection1.Close()

که این خطا رو میده


An unhandled exception of type 'System.NullReferenceException' occurred in WindowsApplication1.exe

Additional information: Object reference not set to an instance of an object.:

لطفا یا یک سورسی که با sql کار میکنه بهم بدید یا اینکه لطف کنید کد درست رو بهم بگید

:عصبانی++::عصبانی++::عصبانی++:: صبانی++::عصبانی++::عصبانی++::ع بانی++::عصبانی++::عصبانی++::عص انی++:

برنامه نویس 20
یک شنبه 09 دی 1386, 12:24 عصر
Dim sqldataadepter1 As new SqlDataAdapter

Sub Zero
یک شنبه 09 دی 1386, 12:33 عصر
کدهای اتصال به بانک و دریافت داده ها همینه :

Dim con As New SqlConnection("Data Source=.\sqlexpress;Initial Catalog=DataAhwaz;Integrated Security=True")
Dim da As New SqlDataAdapter("SELECT * FROM TableName" , con)
Dim dt As New DataTable ' Or Use DataSet
da.Fill(dt)
DataGrid1.ِDataSource=dt
به جای DataAhwaz نام دیتابیس و به جای TableName نام تیبلتون رو بزارید .
در ضمن من احتمال میدم Connection String تون مشکل داشته باشه که Command مقدار Null برمیگردونه

morteza_261
یک شنبه 09 دی 1386, 13:11 عصر
سلام




لطفا یا یک سورسی که با sql کار میکنه بهم بدید یا اینکه لطف کنید کد درست رو بهم بگید



اینجا (http://barnamenevis.org/forum/showthread.php?p=442794#post442794) یه برنامه آپلود کردم یه نگاه بهش بنداز
شاید کارت راه بیافته

http://barnamenevis.org/forum/showthread.php?p=442794#post442794

reza6384
یک شنبه 09 دی 1386, 21:23 عصر
Imports System.Data.SqlClient

Dim StrConn As String
StrConn = "Data Source=.;Initial Catalog=MyDatabase;Integrated Security=True"

Dim Conn As New SqlConnection(StrConn)
Conn.Open()

Dim Query As String = "Select * From TableName"

Dim DS as New DataSet
Dim Result As New DataTable("Result")
DS.Tables.Add(Result)

Dim SDA As New SqlDataAdapter(Query,Conn)
SDA.Fill(DS,"Result")

DataGridView1.DataSource = DS
DataGridView1.DataMember = "Result"



با استفاده از این کد می تونی یه جدول رو توی یک دیتا گرید نمایش بدی
اگر هم خواستی به سطر ها و ستون های جدول دسترسی پیدا کنی

Result.Rows(i).Item(j)

این خط سطر آی ام و ستون جی ام رو میده البته به شرطی که جدول خالی نباشه