تبلیغات :
آکوستیک ، فوم شانه تخم مرغی، صداگیر ماینر ، یونولیت
دستگاه جوجه کشی حرفه ای
فروش آنلاین لباس کودک
خرید فالوور ایرانی
خرید فالوور اینستاگرام
خرید ممبر تلگرام

[ + افزودن آگهی متنی جدید ]




نمايش نتايج 1 به 4 از 4

نام تاپيک: لطفاً كمك كنيد

  1. #1
    در آغاز فعالیت
    تاريخ عضويت
    Nov 2006
    پست ها
    8

    پيش فرض لطفاً كمك كنيد

    نمي تونم ركورد جديد رو از طريق يك صفحه وب وارد بانك بكنم يعني به روز نميشه
    لطفاً رلهنمائيم كنيد .

  2. #2
    پروفشنال hoseinquest's Avatar
    تاريخ عضويت
    Dec 2004
    محل سكونت
    خودم ‌اينجا‌ قلبم ‌بين‌الحرمين
    پست ها
    793

    پيش فرض

    زبان برنامه نویسیت چیه؟
    تو چه محیطی هستی؟ بانک اطلاعاتیت چیه؟ اینجوری که نمیشه جواب داد جونم

  3. #3
    در آغاز فعالیت
    تاريخ عضويت
    Nov 2006
    پست ها
    8

    پيش فرض

    زبان برنامه نويسي vb.net هستش + sql server 2000

  4. #4
    در آغاز فعالیت
    تاريخ عضويت
    Oct 2006
    پست ها
    17

    پيش فرض

    از كد زير مي تواني استفاده كني ولي با Access است. در واقع یک متغیر از نوع ردیف همان جدول معرفی کن و سپس آن را Add کن
    Dim con1 As System.Data.Odbc.OdbcConnection
    Dim conStr1 As String
    conStr1 = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & TextBox1.Text.Trim
    con1 = New System.Data.Odbc.OdbcConnection(conStr1)
    con1.Open()
    Dim dba1 As System.Data.Odbc.OdbcDataAdapter
    dba1 = New System.Data.Odbc.OdbcDataAdapter("Select * From tbl_Bazdid", con1)

    Dim ds1 As DataSet
    ds1 = New DataSet
    Dim i, j As Integer

    '' ''copy tbl_Bazdid
    Dim newR2 As GazGhozareshMain2000DataSet.tbl_BazdidRow
    newR2 = Me.GazGhozareshMain2000DataSet.tbl_Bazdid.Newtbl_B azdidRow
    For j = 0 To ds1.Tables(0).Rows.Count - 1
    For i = 1 To GazGhozareshMain2000DataSet.tbl_Bazdid.Columns.Cou nt - 1
    newR2.Item(i) = ds1.Tables(0).Rows(j).Item(i)
    Next
    Me.GazGhozareshMain2000DataSet.tbl_Bazdid.Addtbl_B azdidRow(newR2)
    Me.Tbl_BazdidTableAdapter.Update(Me.GazGhozareshMa in2000DataSet.tbl_Bazdid)
    GazGhozareshMain2000DataSet.tbl_Bazdid.AcceptChang es()
    newR2 = Me.GazGhozareshMain2000DataSet.tbl_Bazdid.Newtbl_B azdidRow

    Next

Thread Information

Users Browsing this Thread

هم اکنون 1 کاربر در حال مشاهده این تاپیک میباشد. (0 کاربر عضو شده و 1 مهمان)

User Tag List

قوانين ايجاد تاپيک در انجمن

  • شما نمی توانید تاپیک ایحاد کنید
  • شما نمی توانید پاسخی ارسال کنید
  • شما نمی توانید فایل پیوست کنید
  • شما نمی توانید پاسخ خود را ویرایش کنید
  •