(10-08-17, 01:59 PM)hamdyyes كتب : ايه ياشباب مافيش رد ولا ايه
هل هذا هو طلبك؟
إقتباس :ان كان سؤالك حول قرب وقت بيوم او يومين فالامر بسيط.هل تريد هذا فعلا؟
اذا نعم اكتب رد اجهز مثال
vb 2013 access 2010
PHP كود :
Public Class Form1
Dim con As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source=" & Application.StartupPath & "\db.accdb")
Dim dt As DataTable
Dim da As OleDb.OleDbDataAdapter
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim dfrom As Date = Now.Date.ToShortDateString
dt = New DataTable
da = New OleDb.OleDbDataAdapter("", con)
da.SelectCommand.CommandText = "select * from tb where tfinish=@tfinish"
da.SelectCommand.Parameters.AddWithValue("@tfinish", dfrom.AddDays(Val(TextBox1.Text)))
da.Fill(dt)
ListBox1.DataSource = dt
ListBox1.DisplayMember = "tn"
End Sub
End Class
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
