Kald til ekstern URL fra SQL server

Der ville jeg måske anbefale dig at bruge CLR.
http://www.devsource.com/c/a/Using-VS/Introducing-SQL-Server-2005s-CLR-Integration/

Er det HTML eller XML url's du skal kalde?

janus hehe :-) det tage vist lige nogle måneder at lære
Jeg har et lille hurtigt shell program, som du kan lægge ind i en sp, hastigheden er ikke noget problem da det typisk er serveren og netværket der æder tiden og 1000 opslag er ikke noget problem.

fra en dos prompt kan man skrive http.exe http://www.dr.dk og den returnere htlm eller xml koden eller hvad det nu er.
vil du have den? du kan også få koden med

jape44 ==> jeg vil gerne prøve et omtalte program - hvordan får jeg fat i det?

smid en mail

er det en mail adresse du ønsker

ja

nu skal du skynde dig for jeg er på vej hjem :-)ellers mandag

ok download den her http://www.box.net/shared/ehkrpg90ks

mange tak - så ikke dit forrige svar
Downloader nu

Jape44 - dit program virker ikke...... det går i fejl

eller også så er det mig der ikke forstår hvordan det virker/skal afvikles.

Skal programmet (Http.exe) kaldes fra SP eller skal man kalde det fra en dos-boks og så bruge outputtet i en SP?

det virker fint, men du skal skriver den fulde url eks. http://www.dr.dk og ikke www.dr.dk

så kalder du med EXEC master..xp_cmdshell "c:\<din folder>\http 'http://www.dr.dk'.
forsøg dig frem SQL query analyzer og så se hvordan du får et resultat tilbage.

der er også en httpf.exe den returnere kun tekst og all html kode er filtreret fra hvis du får brug for det

Jeg skal lige høre (bare betragt mig som fatsvag ;-)) men skal Http.exe afvikles på server hver der skal skabes kontakt til URL adressen. Jeg havde nu håbet på at kunne benytte nogle indbygget funktioner i SQL serveren.

der er ingen indbygget funktioner til det du efterspørger andet end xp_cmdshell men der er også mulighed for selv at kode sin egen xtendet procedure i form af en dll, men det ville være lidt tåbeligt at gå så vidt da dette er en simpel opgave.

Og ja den skal afvikles på serveren. prøv feks denne i SQL query analyzer EXEC master..xp_cmdshell 'dir' så vil du se hvordan ms sql arbejder med dette.

Sådan en CLR UDF er nu ellers ret simpel:

using System;
using System.Data.SqlTypes;
using System.Net;

using Microsoft.SqlServer.Server;

namespace E
{
    public class Http
    {
        [SqlFunction]
        public static SqlString Get(string url)
        {
            string res = "";
            using(WebClient wc = new WebClient())
            {
                res = wc.DownloadString(url);
            }
            return res;
        }
    }
}

Arne_v: Erstatter CLR UDF'er stored procedure eller der det noget der går hånd i hånd

uuuhhhh... ;-) se det var interessant arne_v. Overvejer virkelig at opgradere.
Hedemann, prøv at følge denne forklaring: http://davidhayden.com/blog/dave/archive/2006/04/18/2917.aspx

en UDF er noget der kun returnerer en enkelt værdi mens en SP kan returnere
op til flere result sets med mange felter

Jeg synes at det var nemmest med en UDF:

SELECT dbo.HttpGet('http://www.eksperten.dk/')
GO

Er på banen igen og har nu fået lavet en funktion under SQL der kalder en url adresse og fanger svaret. Når jeg kalder funktionen med:

SELECT dbo.CallUrl('http://www.eksperten.dk/')
GO

Får jeg flg fejl.

Msg 6522, Level 16, State 2, Line 2
A .NET Framework error occurred during execution of user-defined routine or aggregate "CallUrl":
System.Security.SecurityException: Request for the permission of type 'System.Net.WebPermission, System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089' failed.

Jeg kan godt se at der måske mangler nogle eksterne rettigheder - men hvor sætter jeg dem.

Du kunne prøve teknikken beskrevet her:

http://forums.microsoft.com/MSDN/ShowPost.aspx?PostID=2668212&SiteID=1

Ved du hvordan man giver database owner "External_Access_Assembly" rettigheder?

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

forklarer noget

Okay nu er jeg kommet lidt længer, men nu får jeg flg. fejl/meddelelse... nogle ide til hvad jeg skal gøre?

Msg 6522, Level 16, State 2, Line 2
A .NET Framework error occurred during execution of user-defined routine or aggregate "CallUrl":
System.InvalidOperationException: Data access is not allowed in this context.  Either the context is a function or method not marked with DataAccessKind.Read or SystemDataAccessKind.Read, is a callback to obtain data from FillRow method of a Table Valued Function, or is a UDT validation method.
System.InvalidOperationException:
  at System.Data.SqlServer.Internal.ClrLevelContext.CheckSqlAccessReturnCode(SqlAccessApiReturnCode eRc)
  at System.Data.SqlServer.Internal.ClrLevelContext.GetCurrentContext(SmiEventSink sink, Boolean throwIfNotASqlClrThread, Boolean fAllowImpersonation)
  at Microsoft.SqlServer.Server.InProcLink.GetCurrentContext(SmiEventSink eventSink)
  at Microsoft.SqlServer.Server.SmiContextFactory.GetCurrentContext()
  at Microsoft.SqlServer.Server.SqlContext.get_CurrentContext()
  at Microsoft.SqlServer.Server.SqlContext.get_WindowsIdentity()
  at CallURLFromSQL.UserDefinedFunctions.CallUrl(String sURL)

http://forums.microsoft.com/MSDN/ShowPost.aspx?PostID=558591&SiteID=1

antyder at du skal kalde impctx.Undo() !

Mener at jeg har en .Undo der hvor der skal være en - men det kan være at jeg tager fejl. Jeg vedhæfter lige min kode og håber at du kan se hvor det går galt. Den URL jeg forsøger kalde til sendes over via et paremeter og jeg benytter flg. sql.

KLAD TIL CLR med URL
====================
SELECT dbo.callurl('http://xxx.yyy.zz')
GO

PROGRAM KODE
============
Partial Public Class UserDefinedFunctions
    <Microsoft.SqlServer.Server.SqlFunction()> _
    Public Shared Function CallUrl(ByVal sURL As String) As SqlString

        'impersonate the calling user
        Dim newContext As System.Security.Principal.WindowsImpersonationContext
        newContext = SqlContext.WindowsIdentity.Impersonate()

        Try
            Dim url As String = sURL
            Dim req As HttpWebRequest = CType(WebRequest.Create(url), HttpWebRequest)
            Dim resp As HttpWebResponse = CType(req.GetResponse, HttpWebResponse)
            Dim stmrdr As StreamReader = New StreamReader(resp.GetResponseStream)
            Dim html = stmrdr.ReadToEnd
            stmrdr.Close()
            resp.Close()
            Return New SqlString(html)
        Catch ex As Exception
            'Kald til procedure der skriver i eventloggen
            LogToEventLog(ex.Message)
            Return New SqlString("Error")
        Finally
            newContext.Undo()
        End Try

    End Function

    Public Shared Sub LogToEventLog(ByVal errorMessage As String)
        Dim log As System.Diagnostics.EventLog = New System.Diagnostics.EventLog
        log.Source = "My Application"
        log.WriteEntry(errorMessage)
    End Sub
End Class

Prøv evt. kun at impersonate for eventlog men ikke for HTTP.