Nasýl yapýlýr: SQL Server çalýþan bir ASP sayfasýnda saklý

Adým adým örnek

1. SQL Server Query Analyzer veya SQL Server Management Studio'yu Pubs veritabanýyla aþaðýdaki sorguyu çalýþtýrmak:

   CREATE proc MyProc
   (
   	@price smallint,
   	@out smallint OUTPUT
   )
   AS
   Select @out = count(*) from titles where price < @price
   GO
   						

   saklý yordamýn ("MyProc") bir giriþ parametresi ("@ fiyat") alýr ve bir <a1>parametre</a1> ("@ çýkýþý") çýkýþ verir.
   
   Not Varsayýlan olarak, Northwind örnek veritabanýndaki ve pubs örnek veritabanlarýný SQL Server 2005'te yüklü deðil. Bu veritabanlarýný Microsoft Yükleme Merkezi'nden yüklenebilir. Northwind örnek veritabanýndaki ve pubs örnek veritabaný'ný karþýdan yükleme hakkýnda daha fazla bilgi için aþaðýdaki Microsoft Web sitesini ziyaret edin:
   http://msdn2.microsoft.com/en-us/library/ms143221.aspx (http://msdn2.microsoft.com/en-us/library/ms143221.aspx)
2. Aþaðýdaki ASP örnek kod, yeni oluþturulan saklý yordamý çaðýrýr. Girdi parametresi ve sorguyu çalýþtýrmak için bu ASP kodu kullanabilirsiniz.
   1. Microsoft ActiveX Data Objects parametreleri oluþturmak için CreateParameter yöntemi kullanýn (ADO) aþaðýdaki gibi:

      Set myParameter = Command.CreateParameter (Name, [Type], [Direction], [Size], [Value])
      						

   2. Parametreyi Parameters derlemesine aþaðýdaki gibi eklenir:

      Command.Parameters.Append myParameter
      							

      Not: Parameters derlemesine parametrelerinde sýrasý, saklý yordamdaki parametreleri ayný olmalýdýr.
   3. Içine ve dýþýna saklý yordamýn parametre deðerlerini aþaðýdaki gibi geçirilecek komutu çalýþtýrýn:

      <%
      Dim cmd
      Dim ln
      Dim retCount
      
      Set cmd = Server.CreateObject("ADODB.Command")
      	
      With cmd
          .ActiveConnection = "Paste your connection string here"
          .Commandtext = "MyProc"
          .CommandType = adCmdStoredProc
          .Parameters.Append .CreateParameter("@price", adSmallInt, adParamInput, 10)
          .Parameters("@price") = 22
          .Parameters.Append .CreateParameter("@retValue", adSmallInt, adParamOutput, 10)
          .Execute ln, , adExecuteNoRecords
          retCount = .Parameters("@retValue")
      End with
      
      Response.Write retcount
      
      Set cmd = Nothing
      %>
      						

   Not: Bu örnekte kullanýlan sabitler adovbs.inc dosyasýnda bulunabilir. Bu dosya, Active Server Pages Kurulum sýrasýnda yüklenir ve bu ayarlarý genellikle \ýnetpub klasörünüzde bulunan \Aspsamp\Samples klasörüne yerleþtirilir. Uygulama programlama kodunuzu okuyun ve güncelleþtirmek daha kolay biçimde, saklý yordam çaðýrdýðýnýzda sayýsal deðerler yerine sabit deðerleri kullanmak için önerilir.

   <%@ LANGUAGE = VBScript %>
   <!-- #INCLUDE VIRTUAL="/ASPSAMP/SAMPLES/ADOVBS.INC" -->
   					

3. ADO baðlantý dizesi ortamýnýza uygun olarak deðiþtirin.
4. ASP sayfasýný kaydedin ve tarayýcýda görüntülemek.
   
   Not: Saklý yordamýn parametre bilgilerinin farkýnda varsa doðru bir saklý yordamýn nasýl belirlemek zor olabilir. Doðru bilgileri olmadan ADO parametreleri düzgün oluþturamýyor. Parameter nesnesinin <a2>Yenile</a2> yöntemi, sunucuda saklý yordamýn tanýmý için temel Parameters derlemesine otomatik olarak doldurmak için kullanabilirsiniz. Örneðin:

   Command.Parameters.Refresh
   					

Üste