目的:
HTTPリクエストを実行する.Net 3.5を使用してVB.NET 2008を使用してDLLを作成したい
次に、(トリガーで) SQL Server 2005 から DLL を呼び出し、DLL にいくつかの変数を渡し、戻り値を取得します。
プロセスのどこにいるのですか。
DLL 'HTTPDLL.dll' を作成しました
ソース:
Imports System
Imports System.Configuration
Imports System.Collections.Generic
Imports System.Text
Imports System.Net
Imports System.Security
Imports System.Security.Permissions
Imports System.IO
Imports Microsoft.SqlServer.Server
Public Class HTTPDLL
Public Function HTTPPost(ByVal URL As String, ByVal Content As String) As Boolean
Dim myURL As String = Trim(URL)
Dim mycontent As String = Trim(Content)
Dim rawOutput As String = ""
'Get Acces Right to web
Dim p As New WebPermission(NetworkAccess.Connect, myURL)
p.Assert()
'Prepare the web Request
Dim req As WebRequest = WebRequest.Create(myURL)
req.Timeout = 60000
req.Method = "POST"
req.ContentLength = mycontent.Length
req.ContentType = "application/x-www-form-urlencoded"
Dim sw As New StreamWriter(req.GetRequestStream())
sw.Write(mycontent)
sw.Close()
Dim resp As WebResponse = req.GetResponse()
Dim sr As New StreamReader(resp.GetResponseStream)
rawOutput = sr.ReadToEnd()
sr.Close()
Return True
End Function
Public Function Test() As Integer
Return 1
End Function
Public Function DllMain(ByVal hInst As Long, ByVal fdwReason As Long, _
ByVal lpvReserved As Long) As Boolean
Dim s As String = "sdfghjkolihdgjkhgiueghkyhekygigdjhgfkhsgdkhfgksjdhgkjshdgfkjhsgdkjfhgkshdgfkjhgskjdhgfkjhsdgkfhgskjdhfgkjsdhgfkshdgfkhgsdkfhgksdhfgkshdgfkshdgfkjhsgdkfhgskdhfgksjdhgfkjshgdfkhsgdkfhgskdhfgkshgdfkjhgskdjg"
s &= "kjhdgjkshkdjfhklsjdhfljhgkhvbfiuvbli klrfgliu ghliebliuhdflivbdkljhgljuhfvliuhdf"
Return True
End Function
End Class
DLL を SQL Server の c:/Windows/System フォルダーに配置しました。
これらのアセンブリをロードしました
HelloWorld System.Core System.XML.Linq
これらのコマンドを使用して
EXEC sp_configure 'show advanced options' , '1';
go
reconfigure
go
EXEC sp_configure 'clr enabled' , '1'
go
sp_configure 'Ole Automation Procedures', '1'
GO
RECONFIGURE
-- Turn advanced options back off
EXEC sp_configure 'show advanced options' , '0';
go
reconfigure
GO
-- assembly style
ALTER DATABASE master SET TRUSTWORTHY ON
GO
CREATE ASSEMBLY [System.Core]
AUTHORIZATION [dbo]
FROM 'C:\Program Files\Reference Assemblies\Microsoft\Framework\v3.5\System.Core.dll'
WITH PERMISSION_SET = UNSAFE
GO
CREATE ASSEMBLY [System.Xml.Linq]
AUTHORIZATION [dbo]
FROM 'C:\Program Files\Reference Assemblies\Microsoft\Framework\v3.5\System.Xml.Linq.dll'
WITH PERMISSION_SET = UNSAFE
GO
create assembly HelloWorld from 'C:\WINDOWS\system\HTTPDLL.dll'
with permission_set = safe
GO
次に、拡張プロシージャを追加しました
USE [master]
GO
/****** Object: ExtendedStoredProcedure [dbo].[HTTPDLL] Script Date: 02/03/2010 11:45:28 ******/
EXEC dbo.sp_addextendedproc N'HTTPDLL', 'C:\WINDOWS\system\HTTPDLL.dll'
(この時点では、アセンブリを追加する必要があるかどうか、またはアセンブリを追加する必要があるかどうかはわかりません。これは Dll を直接参照するためです。)
私が解決する必要があるもの。DLL の (拡張プロシージャ) HTTPPost 関数を呼び出したい
私が試したこと exec HTTPPost "Msg 17750, Level 16, State 0, Procedure HTTPPost, Line 1 Could not load the DLL HelloWorld, or one of the DLLs it references. Reason: 126(The specified module could not be found.). "
exec HelloWorld.HTTPPost 'http://www.somewebsite.com',''
「メッセージ 2812、レベル 16、状態 62、行 1 ストアド プロシージャ 'HelloWorld.HTTPPost' が見つかりませんでした。」
私が必要とするもの: 私の実装を見て、すべてが適切に設定されているかどうかを確認し、その DLL を適切に呼び出して変数を送信し、その戻り値をキャッチする方法を (例とともに) 教えてください。とても感謝しています。
私は多くの投稿/記事に目を通し、ここまで私を連れてきた小片を手に入れましたが、すべてを網羅したものはありません.
私もこれを試しました
-- Scratch variables used in the script
DECLARE @retVal INT
DECLARE @comHandle INT
DECLARE @errorSource VARCHAR(8000)
DECLARE @errorDescription VARCHAR(8000)
DECLARE @retString VARCHAR(100)
-- Initialize the COM component.
EXEC @retVal = sp_OACreate 'HTTPDLL.HTTPDLL', @comHandle OUTPUT
IF (@retVal <> 0)
BEGIN
-- Trap errors if any
EXEC sp_OAGetErrorInfo @comHandle, @errorSource OUTPUT, @errorDescription OUTPUT
SELECT [Error Source] = @errorSource, [Description] = @errorDescription
RETURN
END
(および他のそのようなバリアント) を取得し、sp_OAGetErrorInfo の戻り値でこれを取得します。
「エラー ソースの説明 ODSOLE 拡張プロシージャの無効なクラス文字列」
おそらく私はそれを間違って呼んでいますが、私はそれを機能させることができませんでした(常に「無効なクラス文字列」を返します)
よろしくお願いいたします。