KARIMSOFT

حاول مرقبة قاعدة البيانات لمعرفت ما هي مصدر الاتصال بقاعدة البيانات ربما يكون هنا استعلام يخذ كيرا من الوقت وهذا ما يسبب هذا العطل ويكود طرق كثير لمراقبة قاعدة البيانات مثل Performance Tools

الموضو مكرر ابحث بالمنتدي

http://www.dotnetcurry.com/showarticle.aspx?ID=138

هذا الكود vb6 يفتح تقرقر في الاكسس Dim objAccess As Object Dim dbName As String Dim rptName As String Dim Preview As Long Const acNormal = 0 Const acPreview = 2 dbName = App.Path & "\A.mdb" rptName = "R" Preview = acPreview 'acNormal With objAccess .OpenCurren…

ابحث بالمنتدي يوجد الكثير

how to run sql server

قد يفيد هذا الكود ولا افضل ان تستخدم قاعد بيانات انظر هذا Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim str As String = "" Dim ooo As New Threading.Thread(AddressOf aa) ooo.Start(str) TextBox1.T…

الف مليوووون مبروك واواواءءءءءءءء :hot: :cry: :tbwall: يارب يكون مبرمج شاطر واشطر مننا جميعا بالتوفيق

قم بحف ملف bin واضغط الملف

قمت بحذف OrderID لانه حقل رقم وهو تلقائي الترقيم

try this alter PROCEDURE [dbo].[proc_Orders] @CustomerID nvarchar(5) , @EmployeeID int , @OrderDate datetime , @RequiredDate datetime , @ShippedDate datetime , @ShipVia int, @Freight money , @ShipName nvarchar(40) , @ShipAddress nvarchar(60) , @ShipCity nvarch…

http://msdn.microsoft.com/en-us/library/ms187922.aspx

قد يفيدك هذا الكود select top (1) Cost from tab1 order by update_date desc

افتح مضوضوع جديد

الموضوع مكرر ابحث بالمنتدي

اعتقد لو ارفق المشروع يكون افضل

Dim oleconnstring As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dbpath Dim oleconnection As New OleDbConnection(oleconnstring) Dim olecommand As New OleDbCommand try oleconnection.Open() olecommand.Connection = oleconnection olecommand.CommandT…

http://stackoverflow.com/questions/10784613/how-to-rename-file-in-vb-net

طريقتك ليست صحيحة اذظر هذا الكود Dim oleconnstring As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dbpath Dim oleconnection As New OleDbConnection(oleconnstring) Dim olecommand As New OleDbCommand try oleconnection.Open() olecommand.Connection = …

يعدل هذا السطر e.Graphics.FillEllipse(Brushes.Orange, ballX - 7, ballY - 7, g, g); الي e.Graphics.FillEllipse(Brushes.Orange, ballX - (g/2), ballY - (g/2), g, g);