Utilisez la communication de service HTTPSService et ASP pour terminer l'opération de base de données
Je fournis une idée pseudo-service pour ASP:
ClientReq.xml:
------------------------------------------------ - - ---------------------------------------------
<?
<SestPacket>
<sgtype> getValuereq </sgtType>
<Version> 1.0 </ version>
</ testpacket>
index.mxml:
------------------------------------------------ - - ---------------------------------------------
<mx: modèle id = mreq source = clientRreq.xml />
<mx: httpService id = hs url = http: //asp/testServer.asp
resultFormat = xml
Méthode = Post
ContentType = application / xml
showbusycursor = true>
<mx: demande>
<xml> {mreq} </xml>
</ mx: demande>
</ mx: httpService>
TestServer.asp:
------------------------------------------------ - - ---------------------------------------------
Obtenir principalement des paquets de données, analyser les paquets de données, les opérations spécifiées et revenir à quatre étapes de données
1 et 1 Obtenir un paquet de données soumis
SET DOM = Server.CreateObject (MSXML2.Document)
Demande d'Odom.load
2 Analyser le paquet de données et obtenir MSGTYPE
SMSGTYPE = TRIM (ODOM.SelectSingleDe (// MsgType) .Text)
Sélectionnez SMSGTYPE
Case getvaluereq
Appelez GetValue
'Case DeleTevalueq
'Appelez DeleTevalue
cas insertvalueq
'Appeler InsertValue (ODOM)
'Case UpdateValueq
'Appeler UpdateValue
'Else Case
'Appelez Showerrmsg
fin de sélection
3 et 3 Spécifiez l'opération, complétez l'opération GetValue ici, dont beaucoup peuvent être transformées en modules publics pour d'autres fonctions
Sconn = driver = {Microsoft Access Driver (* .mdb)};
SET OCONN = Server.CreateObject (ADODB.Connection)
Oconn.open Sconn
SSQL = SELECT * From Message Order by ID DESC
setrs = server.createObject (adodb.oldset)
ORS.Open SSQL, OCONN, 1, 1
'Document XML enregistré constructif
Si organe.eof et nôtre.bof alors
sxml = <?
<SestPacket> & vbcrlf & _
<sgType> SystemResp </SGTYPE> & VBCRLF & _
<Version> 1.0 </ version> & vbcrlf & _
<Sult> 0 </cult> & vbcrlf & _
</ testpacket>
terminer si
'La construction a un document XML record
Sinon (iates.eof et ors.bof) alors
faire tout en ne faisant pas
stmpxml = stmpxml & <mdans> & vbcrlf & _
<name> & org (name) & </name> & vbcrlf & _
<ege> & & & </ge> & vbcrlf & _
<Sex> & & & </ Sex> & vbcrlf & _
<sg> & org (msg) & </sg> & vbcrf & _
</dess
ondenext
boucle
sxml = <?
<SestPacket> & vbcrlf & _
<sgType> SystemResp </SGTYPE> & VBCRLF & _
<Version> 1.0 </ version> & vbcrlf & _
<Sult> 1 </ Result> & vbcrlf & stmpxml & _
</ testpacket>
terminer si
4. Données de retour
SET DOM = Server.CreateObject (MSXML2.Document)
odom.loadxml (sxml)
odom.save (réponse)
Définir Odom = rien
Message.mdb
------------------------------------------------ - - ---------------------------------------------
Nom de la base de données: message.mdb
Titre des données: message
Champ de données: type de champ
Numéro automatique d'identification
nom de texte
Numéro d'âge
texte sexuel
Remarques MSG
Résultats de l'exécution:
------------------------------------------------ - - ---------------------------------------------
Lorsque je définis le resultFormat = Text de HttpService, consultez les résultats de l'affichage
Ce sujet contient des pièces jointes: SF_200411813537.jpg (23359 bytes)
Blog CSDN: http://blog.csdn.net/stefli
Stefli's mp3: http://stefli.88ip.net/flex/mp3player.swf