همه آموزش ها با 50 درصد تخفیف تو جشنواره بهاره توسینسو
50 درصد تخفیف
مانده تا پایان تخفیف ها
مانده تا پایان تخفیف ها

Error: There is no row at position 0

بپرسید
  • مهدی ح مهدی ح
  • 64 ماه قبل
  • 64 ماه قبل
  • 273 نمایش

0

{{ digitTrunc(content.likes) }}

VB.NET

با سلام، ویژوال استودیو به من این ارور رو نمایش میده:

یه نرم افزار ساده درست کردم که یه آیتم از بانک اطلاعاتی اکسس بگیره و در تکست باکس نمایش بده. ولی این ارور رو میده!

An unhandled exception of type 'System.IndexOutOfRangeException' occurred in System.Data.dll

Additional information: There is no row at position 0

VB.NET با سلام، ویژوال استودیو به من این ارور رو نمایش میده: یه نرم افزار ساده درست کردم که یه آیتم از بانک اطلاعاتی اکسس بگیره و در تکست باکس نمایش بده. ولی این ارور رو میده! <left> An unhandled exception of type 'System.IndexOutOfRangeException' occurred in System.Data.dll Additional information: There is no row at position 0 <left> ||https://tosinso.com/files/get/2def2034-d1c8-4434-885c-8e2aa4527583|| کدهایی که نوشتم: <left> Imports System.Data.OleDb Public Class Form1 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load Dim StrCon As String = Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\Admin\Documents\Visual Studio 2015\Projects\Eshkal_Nevis\Eshkal_Nevis\bin\Debug\ EshkalBankTest.accdb Dim Con As OleDbConnection Dim da As OleDbDataAdapter 'Dim cmd As OleDbCommand Dim stroledb As String = Dim ds As New DataSet ds.Reset() Con = New OleDbConnection(StrCon) Con.Open() stroledb = SELECT GozareshD FROM Eshkal WHERE (GozareshD = ' & TextBox1.Text & ') da = New OleDbDataAdapter(stroledb, Con) da.Fill(ds, Eshkal) Con.Close() TextBox1.Text = ds.Tables(Eshkal).Rows(0).Item(GozareshD) End Sub End Class <left> وقتی کدها رو در ویژوال استودیو اجرا می‌کنم، نرم افزار اطلاعات رو نشون میده! حتی یه DataGirdView هم درست کردم، تا اطلاعات رو نمایش بده، که نمایش هم داد. یعنی بانک اطلاعاتی موردی نداره! حتی بانک اطلاعاتی رو هم عوض کردم ولی باز این ارور رو میده!

کدهایی که نوشتم:

Imports System.Data.OleDb

Public Class Form1

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

Dim StrCon As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\Admin\Documents\Visual Studio 2015\Projects\EshkalNevis\EshkalNevis\bin\Debug\ EshkalBankTest.accdb"

Dim Con As OleDbConnection

Dim da As OleDbDataAdapter

'Dim cmd As OleDbCommand

Dim stroledb As String = ""

Dim ds As New DataSet

ds.Reset()

Con = New OleDbConnection(StrCon)

Con.Open()

stroledb = "SELECT GozareshD FROM Eshkal WHERE (GozareshD = '" & TextBox1.Text & "') "

da = New OleDbDataAdapter(stroledb, Con)

da.Fill(ds, "Eshkal")

Con.Close()

TextBox1.Text = ds.Tables("Eshkal").Rows(0).Item("GozareshD")

End Sub

End Class

وقتی کدها رو در ویژوال استودیو اجرا می‌کنم، نرم افزار اطلاعات رو نشون میده!

حتی یه DataGirdView هم درست کردم، تا اطلاعات رو نمایش بده، که نمایش هم داد. یعنی بانک اطلاعاتی موردی نداره!

حتی بانک اطلاعاتی رو هم عوض کردم ولی باز این ارور رو میده!

دوره های شبکه، برنامه نویسی، مجازی سازی، امنیت، نفوذ و ... با برترین های ایران
برای مشاهده تخفیف های ویژه امروز کلیک کنید

پاسخ ها به این سوال

پاسخ ها به این سوال

{{ digitTrunc(post.likes) }}

این پست در تاریخ {{ dateString(new Date(post.deleteDate)) }} توسط {{ post.deletedByUser }} حذف شده است.

دلیل حذف: {{ post.deleteReason ?? 'نامشخص' }}

{{ err }}
{{ post.userAchivements.rhodiumAchievements }}
{{ post.userAchivements.platinumAchievements }}
{{ post.userAchivements.goldAchievements }}
{{ post.userAchivements.silverAchievements }}
{{ post.userAchivements.bronzeAchievements }}
{{ timeSince(new Date(post.date)) }} قبل
برای ثبت پاسخ خود در وب سایت وارد حساب کاربری خود شوید
قابلیت ارسال مطلب توسط مدیریت سایت غیر فعال شده است
پست های وبلاگ
جدیدترین مقالات
سوالات محبوب
فعالترین سوالات