build broken

Seit einiger Zeit sind wir dabei, unser Portal zu refaktorisieren. Das entfernte Ziel ist, alles in .NET um zu bauen. Das betrifft zur Zeit über tausend Seiten aber wir möchten noch in diesem Leben fertig sein

Dazu kommt noch, dass wir – selbstverständlich – agiles Softwarentwicklung betreiben, was eine ständige und rhythmische Iteration vorsieht, keine Mega-Projekte mit ungewissem Ende. Also haben wir die verschiedenen Bereiche identifiziert und diese werden einer nach dem anderen neu gebaut.
Die neuen DLL-s in .NET werden mit Hilfe von verschiedenen Webservices angesprochen. Das führt allerdings unweigerlich dazu, 2 Technologien – ASP-Classic und .NET(C#) – miteinander sicher kommunizieren zu lassen. Das funktioniert so:

Dieser hier könnte der besagte .NET Webservice sein:

    1 POST http://www.webAdresse.de/Webservice.asmx HTTP/1.1
    2 Host: webServer
    3 Content-Type: text/xml; charset=utf-8
    4 Content-Length: length
    5 SOAPAction: "http://tempuri.org/AendernEtwas"
    6 
    7 <?xml version="1.0" encoding="utf-8"?>
    8 <soap:Envelope xmlns:xsi=http://www.w3.org/2001/XMLSchema-instance 
    9  xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">
   10   <soap:Body>
   11     <AendernEtwas xmlns="http://tempuri.org/">
   12       <id>int</id>
   13       <person>
   14         <nachname>string</nachname>
   15         <vorname>string</vorname>
   16       </person>
   17     </AendernEtwas>
   18   </soap:Body>
   19 </soap:Envelope>

Um ihn aufzurufen, brauchen wir in ASP folgendes:

    1 'Webserviceaufruf mit Angaben von Methodennamen und Parameter-XML
    2 Function webserviceCall(ByVal methode, ByVal xmlParameters)
    3     Dim objRequest, strRet
    4     Set objRequest = Server.createobject("MSXML2.XMLHTTP")
    5     With objRequest
    6     .open "POST", "http://www.webadresse.de/Webservices.asmx", False
    7     .setRequestHeader "Content-Type", "text/xml; charset=utf-8"
    8     .setRequestHeader "SOAPAction11", methode
    9     .send xmlParameters
   10     End With
   11     strRet = objRequest.responseText
   12     if CInt(objRequest.status) <> 200 then
   13         'Fehlerbehandlung, wenn Aufruf fehlgeschlagen
   14     end if
   15     Set objRequest = Nothing
   16     webserviceCall = strRet
   17 end function

Die Parameter werden so übergeben:

Und das wäre dann alles, jetzt muss die Funktion nur noch aufgerufen werden:

responseText = webserviceCall("AendernEtwas", strParameters)

Das Ergebnis kann man danach mit Microsoft.XMLDOM ausgelesen werden.

Noch ein paar Bemerkungen:
- .NET ist im Gegensatz zu ASP-Classic case sensitive und eine stark typisierte Sprache, also obacht auf

1. die korrekte Schreibweise der Parameternamen in XML und auf
2. die Datentypen: strings müssen mit CDATA umklammert, Enums mit dem Namen angesprochen und Datumswerte in ISO 8601-Datumsformat (YYYY-MM-DDThh:min:sec.millisecond) angegeben werden.

Geschrieben am Freitag, 19. Juni 2009 um 12:55 pm und ist zu finden in Webservice. Du kannst die Antworten zu diesem Thema verfolgen unter RSS 2.0 feed. Du kannst Antwort, oder trackback von deiner Seite.