تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
طباعة السجل الحالي
#1
عند اضافة سجل جديد اريد عند الضغط على زر طباعة باركود يتم طباعة السجل الحالي

اي طباعة رقم القيد الحالي


الملفات المرفقة
.rar   WindowsApplication4.rar (الحجم : 457 بايت / التحميلات : 74)
الرد }}}
تم الشكر بواسطة:
#2
يا علي،

شو هاذ اللي في WindowsApplication4

عموما، كان الحل موجود في موضوعك: طباعة التقرير
http://vb4arb.com/vb/thread-15919.html


الملفات المرفقة
.rar   WindowsApplication3-2.rar (الحجم : 146.03 ك ب / التحميلات : 93)
الرد }}}
تم الشكر بواسطة:
#3
هذا في حال اختيار سجل من الداتا قريد فيو
وانا لااريد هذا بل اريد عند اضافة السجل والظغط على مفتاح باركود يتم طباعة هذا السجل المضاف

هذا هو المثال المرد تطبيق المطلوب عليه بحيث عند اضافة سجل جديد يتم طباعة باركود لنفس هذا السجل


الملفات المرفقة
.rar   WindowsApplication3-2.rar (الحجم : 333.8 ك ب / التحميلات : 83)
الرد }}}
تم الشكر بواسطة:
#4
هل من مجيب

مافيه اي احد يساعدني
الرد }}}
تم الشكر بواسطة:
#5
مافيه حل ياخوان

هل السوال صعب ياخوان

وين المساعده ياخوان Huh
الرد }}}
تم الشكر بواسطة:
#6
مافيه ردود
الرد }}}
تم الشكر بواسطة:
#7
وينكم يااستذة مافية مساعدة
الرد }}}
تم الشكر بواسطة:
#8
اذا كنت تريد طباعة السجل الحالي قول لي
الرد }}}
تم الشكر بواسطة:
#9
ايه نعم اريد عند اضافة السجل يتم طباعتة اي السجل الحالي الموجود على الفورم

والمثال موجود لتطبق المطلوب عليه
الرد }}}
تم الشكر بواسطة:
#10
راح ارفقلك مثال الصحيح ان شاء الله يساعدك

كود :
Imports System.Data.SqlClient
Imports CrystalDecisions.CrystalReports.Engine


Public Class Form1
    Dim conn As New SqlConnection("Data source=.\SQLEXPRESS; Database=yours;Integrated Security=true")
    Dim cmd As SqlCommand
    Dim reader As SqlDataReader
    Dim r As Integer
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim SqlQuery As String = "select * from table WHERE id = " & DataGridView1.SelectedRows(0).Cells(0).Value & ""

        Dim SqlCommand As New SqlCommand
        Dim SqlAdepter As New SqlDataAdapter
        Dim TABLE As New DataTable

        With SqlCommand
            .CommandText = SqlQuery
            .Connection = conn
        End With
        With SqlAdepter
            .SelectCommand = SqlCommand
            .Fill(TABLE)
        End With
        Dim crystal As New CrystalReport1
        crystal.SetDataSource(TABLE)
        CrystalReportViewer1.ReportSource = crystal
        CrystalReportViewer1.Refresh()

    End Sub


    Private Sub showdata()
        Dim conn As SqlConnection = New SqlConnection("Data source=.\SQLEXPRESS; Database=yours;Integrated Security=true")
        Dim sqlstr = "select * from table"
        Dim da As SqlDataAdapter = New SqlDataAdapter(sqlstr, conn)
        Dim ds As New DataSet
        da.Fill(ds)
        DataGridView1.DataSource = ds.Tables(0)



    End Sub

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



    End Sub



End Class
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيف من الممكن طباعة كل سجل في صفحة مستقلة ( Report Viewer ) abomo3ath 2 814 24-09-23, 09:31 AM
آخر رد: abomo3ath
  طباعة داتا جريد في جدولين على الريبورت ahmed_elwerfalli 1 516 21-08-23, 05:53 PM
آخر رد: Taha Okla
  [سؤال] مشكلة في طباعة footer تقرير كريستال ريبورت i1982 5 1,124 29-03-23, 11:30 PM
آخر رد: sanyor77
  طباعة بيانات من عدّة جداول عبد العزيز البسكري 2 2,397 19-07-21, 12:37 AM
آخر رد: Lathe1
  طباعة سجلات متعددة فى تقارير متعددة mr_hso 0 1,584 14-09-20, 06:09 PM
آخر رد: mr_hso
  لا استطيع طباعة التقرير bassant 6 2,566 09-06-20, 10:43 AM
آخر رد: bassant
  [VB.NET] طباعة كريستال ريبورت tahaayyoub 0 1,697 29-04-20, 04:11 AM
آخر رد: tahaayyoub
  [VB.NET] معالجة مشكل طباعة الفاتورة دون حفضها sniperjawadino 5 2,495 07-10-19, 12:39 PM
آخر رد: sniperjawadino
  [سؤال] ظهور خطأ no such interface عند طباعة صفحة word ويندوز windows 10 عبد الله 2 2,146 01-10-19, 03:41 AM
آخر رد: عبد الله
  [سؤال] طباعة كل سجل في الجدول بصفحة محاسب يوسف 13 6,935 04-09-19, 01:50 PM
آخر رد: Hassan.syria

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم