ينتظر التفعيل
السلام عليكم
انا مش عندى اى طريقة اغير من الفجوال 6 ، اما بالنسبة للاوراكل مش ح اشتغل بيه
تحياتى
مشرف ملتقى علم نظم المعلومات الجغرافية
لو أنك أوضحت الهدف من برنامجك أكثر ربما أستطيع أن اشير عليك بطرق أكثر كفاءه
أما بالنسبة للـ VB6 فلقد هاجرته من عام 2003 وبالكاد أذكره ، لكني سأحاول أن أتذكر قدر إمكاني
لكن المهم أن تعرفي أن الـ ADO في Visual Basic عند تعامله مع ملفات mdb التي تحمل قاعدة البيانات الجغرافية فإنه:
أولا: ستنتج عنه مشاكل لأنه يعتمد على MSDatabase Jet 4 بينما ملفات mdb في ArcGIS 9.x فهي MS Database Jet 6 أو أعلى - تذكري انك لن تستطيعين فتح قاعدة بيانات جغرافية طورت باستخدام ArcGIS 9.2 بـ ArcGIS 9
ثانيا الـ Jet 4 التي يستخدمها VB6 لا تدعم الـ BLOPData Type ومن ثم حتى لو قررت ان تنفذي برنامج للرسم يقوم برسم البيانات الجغرافية لن يمكن ذلك
ينتظر التفعيل
السلام عليكم
الهدف من البرنامج هو توفير معلومات عن الطريق والخدمات الموجودة على الطريق
ينتظر التفعيل
انا لدى خرطة واخدت احداثيات بداية ونهاية الطريق ، واحداثيات بداية ونهاية الخدمات على الطريق واتجاه الخدمات وبعد الخدمات عن الطريق
الخدمات هى ( مياه - كهرباء - صرف صحى - تشجير - انارة - خطوط الهاتف )
وشكرا
مشرف ملتقى علم نظم المعلومات الجغرافية
لو حولت بياناتك لـ shapefile ممكن تقرأيها مباشرة باستخدام الـ ِADO
لكن في كل الأحوال بن يمكنك أن تقومي بـ Editing للرسوم
ينتظر التفعيل
السلام عليكم
انا حولت الى shape file
بس كيف الطرييييييقة للربط
وشكررااااااااااااااااااااااااااااااا
مشرف ملتقى علم نظم المعلومات الجغرافية
تقصدي فتح الجداول وعرضها وتحديث السجلات
أم
عرض الـ Shapefile نفسها
ينتظر التفعيل
السلام عليكم
ايوة قصدى افتح الجداول وعرضها وتحديث السجلات وعرض ال shape file
وشكرااااااااااااااااااا
ينتظر التفعيل
بليييييييييييييييييييييييييييز انا منتظرة الرد
مشرف ملتقى علم نظم المعلومات الجغرافية
[align=justify]بداية انا كما قلت من قبل استخدم VB.net 2008 وقد هاجرت من VB6 من سنوات، والكود التالي مكتوب بـ VB.NET 2008 و ADO.NET على .NET Framework 3.5 وهذا هو ما استطيع أن أقدمه.
أنا عندي shapefile اسمه idlcity.shp على المجلد G:\GISTrain وأريد فتحه في جدول
أنشئت برنامج يحتوي على نموذج Form وقمت بوضع عنصري تحكم DataGridView و Button فوقه كما بالشكل التالي[/align]
[align=justify]ثم قمت بكتابة التعليمات التالية في حدث المفتاح:[/align]
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim myDataset As New DataSet()
Dim myConnection As New OleDb.OleDbConnection()
Dim myExpression As String = "Select * from idlcity"
myConnection.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=G:\TrainGIS;Extended Properties=dBASE IV;User ID=Admin"
Try
myConnection.Open()
Dim myDataTable As New DataTable
Dim myCommand As New OleDb.OleDbCommand(myExpression, myConnection)
Dim myAdapter As New OleDb.OleDbDataAdapter
myAdapter.SelectCommand = myCommand
myAdapter.Fill(myDataTable)
myDataGrid.DataSource = myDataTable
myDataGrid.AutoSizeRowsMode = DataGridViewAutoSizeRowsMode.AllCells
myDataGrid.AutoSizeColumnsMode = DataGridViewAutoSizeColumnsMode.AllCells
myConnection.Close()
Catch ex As Exception
MsgBox(ex.Message.ToString)
Finally
myConnection.Dispose()
End Try
End Sub
[align=justify]عند النقر فوق هذا المفتاح سوف يتم فتح الجول في الـ GridDataView كما بالشكل التالي[/align]
[align=justify]لتحديث محتويات الجدول يمكنك استخدام عبارات SQL من النوع Insert و Update مع myCommand.SelectNoQuery
أما بالنسبة لعرض محتويات الـ Shapefile الرسومية فيجب أن تستخدمي الـ MapControl على النحو المذكور في المشاركة
http://gisclub.net/vb/showthread.php?t=2911[/align]
ضوابط المشاركة
رد مع اقتباس
