SQL Access bağlantısında parametreli combobox kullanma
#1
SQL
  1. Kaynak : microsof
  2. Açılan kutu oluşturma
  3. Bu bölümde, önce o anki müşterinin siparişlerinin bir listesini görüntüler Müşteriler formunda bir birleşik giriş kutusu oluşturmak nasıl gösterir.
  4. 1. Müşteriler formu Tasarım görünümünde açın.
  5. 2. Araç kutusunda, Denetim Sihirbazları' nı tıklatın ve sonra açılan kutu forma ekleyin.
  6. 3. Sihirbazın ilk sayfasında, tablo veya sorgudaki değerleri arama ve sonra İleri' yi tıklatın seçIN.
  7. 4. Sihirbazın ikinci sayfasında, Orders tablosunu tıklatın ve sonra İleri' yi tıklatın.
  8. 5. Sihirbazın üçüncü sayfasında, OrderID, CustomerID ve sipariş tarihi, birleşik giriş kutusundaki alanları olarak ekleyin ve sonra İleri' yi tıklatın.
  9. 6. Sihirbazının dördüncü sayfasında, Anahtar sütunu Gizle temizlemek içIN tıklatın ve sonra görünür durumda değilse, MüşteriNo sütunu küçülebilir. Ileri ' yi tıklatın.
  10. 7. Beşinci sayfasında sihirbazın yeniden SiparişNo alanıyla veritabanınızda depolamak veya kabul etmek için İleri ' yi tıklatın.
  11. 8. Altıncı sayfasında Sihirbazı'nın, daha sonra kullanmak için değeri anımsa ve sonra da İleri' yi seçIN.
  12. 9. Sihirbazın son sayfasında, açılan kutu Sırası Seçetiketleyin ve Son' u tıklatın.
  13. 10. Birleşik giriş kutusu için özellik sayfasını açın ve sonra SelectOrderComboiçin birleşik giriş kutusunun adını değiştirin.
  14. 11. Birleşik giriş kutusunun OnClick özelliğini aşağıdaki olay yordamını ayarlayın:
  15. 12. Private Sub SelectOrderCombo_Click()
  16. 13. On Error GoTo Err_SelectOrderCombo_Click
  17. 14. Dim stDocName As String
  18. 15. Dim stLinkCriteria As String
  19. 16.
  20. 17. stDocName = "Orders"
  21. 18.
  22. 19. stLinkCriteria = "[OrderID]=" & Me![SelectOrderCombo]
  23. 20. DoCmd.OpenForm stDocName, , , stLinkCriteria
  24. 21.
  25. 22. Exit_SelectOrderCombo_Click:
  26. 23. Exit Sub
  27. 24.
  28. 25. Err_SelectOrderCombo_Click:
  29. 26. MsgBox Err.Description
  30. 27. Resume Exit_SelectOrderCombo_Click
  31. 28.
  32. 29. End Sub
  33.  
  34. Birleşik giriş kutusu oluşturma
  35. Bu bölüm, birleşik giriş kutusunu yenilemek için kullanabileceğiniz yöntemleri gösterir.
  36.  
  37. Yöntem 1 ve 2, açılan kutunun seçili olduğundan, her zaman eşleşen geçerli müşteri siparişlerini görüntülemek birleşik giriş kutusunun satır kaynağı OnClick olay sıfırlar.
  38.  
  39. Not: Müşteri Kimliği alanına bir metin alanı olduğundan, tek tırnak işareti (') formları başvuru birleştirilmek.
  40. WHERE CustomerID = '" & Forms![Customers]![CustomerID] & "'"
  41.  
  42. için:
  43. WHERE CustomerID = 'ALFKI'
  44.  
  45. Birleşik giriş kutusunu yenilemek için kod ekleme
  46. OnEnter özelliği birleşik giriş kutusunun olay yordamını ayarlayın:
  47. Me.SelectOrderCombo.RowSource = "SELECT TOP 100 PERCENT OrderID, CustomerID, OrderDate FROM Orders WHERE " _
  48. & "CustomerID = '" & Forms![Customers]![CustomerID] & "' ORDER BY OrderDate DESC"
  49.  
  50.  
  51. Yöntem 1: Kullanarak Ad Hoc seçin
  52. 1. Görünüm Tasarımcısı'nda yeni görünüm oluşturmak ve sonra Siparişler tablosundan SiparişNo ve MüşteriNo OrderDate alanları seçin. En yeniden en eskiye giden bir sıralamada siparişlerinin listesini sıralamak için AzalanSıralama türü sipariş tarihi alanı için ayarlayın.
  53. 2. Görünüm vwCustomerOrders kaydedin.
  54. 3. OnEnter özelliği birleşik giriş kutusunun olay yordamını ayarlayın:
  55. 4. Me.SelectOrderCombo.RowSource = "SELECT * FROM vwCustomerOrders WHERE CustomerId = '" & Forms![Customers]![CustomerID] & "'"
  56.  
  57. Yöntem 3 ve 4'te, birleşik giriş kutusu Requery yöntemini bir saklı yordam veya SQL işlevi eşleşen kayıtları döndürmek için yeniden yürütmek için OnEnter olay denir.
  58.  
  59. Aşağıdaki örneklerde, birleşik giriş kutusu geçerli müşteri için tüm siparişlerin bir listesini döndürür.
  60. Yöntem 2: bir SQL Server görünümü kullanma
  61. 1. Grafik Tasarımcısı'nda yeni bir yordam oluşturun.
  62. 2. Orders tablosunu seçin ve sonra OrderID, CustomerID ve OrderDate alanları saklı yordama ekleyin.
  63. 3. @CustomerID Müşteri Kimliği alanı için ölçüt olarak girin ve sipariş tarihi alanında Azalan sıralama.
  64. 4. Saklı yordam spCustomerOrders kaydedin ve kapatın.
  65. 5. SpCustomerOrders depolanan yordamı birleşik giriş kutusunun satır kaynağı olarak ayarlayın.
  66.  
  67. Not: aşağıdaki SQL deyimi oluşturulan ve depolanan yordamı tasarımcısı tarafından kaydedilen:
  68. 6. CREATE PROCEDURE dbo.spCustomerOrders
  69. 7. (@CustomerID varchar(5))
  70. 8. AS SELECT OrderID, CustomerID, OrderDate
  71. 9. FROM dbo.Orders
  72. 10. WHERE (CustomerID = @CustomerID)
  73. 11. ORDER BY OrderDate DESC
  74.  
  75. 12. OnEnter özelliği birleşik giriş kutusunun olay yordamını ayarlayın:
  76. 13. Me.SelectOrderCombo.Requery
  77.  
  78. Yöntem 3: kullanarak bir SQL Server saklı yordamı
  79. Access projesinde veri kaynağı olarak SQL Server 2000 veya sonraki bir sürümünü kullanıyorsa, bu yöntem yalnızca kullanabilirsiniz.
  80. 1. Grafik Tasarımcısı'nda bir işlev oluşturun.
  81. 2. Orders tablosunu seçin ve sonra OrderID, CustomerID ve OrderDate alanları saklı yordama ekleyin.
  82. 3. @CustomerID Müşteri Kimliği alanı için ölçüt olarak girin ve sipariş tarihi alanında Azalan sıralama.
  83. 4. İşlev fnCustomerOrders kaydedin ve kapatın.
  84. 5. FnCustomerOrders işlevi birleşik giriş kutusunun satır kaynağı olarak ayarlayın.
  85.  
  86. Not: aşağıdaki SQL deyimi oluşturulan ve depolanan yordamı tasarımcısı tarafından kaydedilen:
  87. 6. CREATE FUNCTION dbo.fnCustomerOrders
  88. 7. (@CustomerID varchar(5))
  89. 8. RETURNS TABLE
  90. 9. RETURN ( SELECT TOP 100 PERCENT OrderID, CustomerID, OrderDate
  91. 10. FROM dbo.Orders
  92. 11. WHERE (CustomerID = @CustomerID)
  93. 12. ORDER BY OrderDate DESC )
  94.  
  95. 13. OnEnter özelliği birleşik giriş kutusunun olay yordamını ayarlayın:
  96. 14. Me.SelectOrderCombo.Requery





  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  acces formundaki combobox'ın kayıt kaynağını sql server stored procedure yapmak abkbek 9 4.475 11-12-2014, 21:48
Son Mesaj: karakabus
  Ms Access ve Sql Server parametreli Stored Procedures beab05 1 4.533 11-12-2014, 12:47
Son Mesaj: karakabus

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi