Gunakan komunikasi layanan httpservice dan asp -pseudo -web untuk menyelesaikan operasi database
Saya memberikan ide layanan pseudo untuk ASP:
clientreq.xml:
-------------------------------------------------- ---------------------------------------------
<? Versi XML = 1.0 Encoding = GB2312?>
<TestPacket>
<msgtype> getValueREQ </sgtype>
<version> 1.0 </version>
</testpacket>
index.mxml:
-------------------------------------------------- ---------------------------------------------
<mx: model id = mreq source = clientreq.xml/>
<mx: httpservice id = hs url = http: //asp/testserver.asp
resultFormat = xml
Metode = posting
ContentType = Aplikasi/XML
showbusycursor = true>
<mx: request>
<xml> {mreq} </xml>
</mx: Request>
</mx: httpservice>
testServer.asp:
-------------------------------------------------- ---------------------------------------------
Terutama mendapatkan paket data, parsing paket data, operasi tertentu, dan kembali ke empat langkah data
1. Dapatkan paket data yang dikirimkan
Set DOM = Server.CreateObject (msxml2.document)
permintaan odom.load
2. Analisis paket data dan dapatkan msgtype
Smsgtype = trim (odom.selectsinglede (// msgtype) .text)
Pilih SMSGType Case
Case getValueQ
Hubungi GetValue
'Case Deletevalueq
'Hubungi DeletEvalue
Case InsertValueQ
'Call InsertValue (ODOM)
'Case UpdateValueq
'Hubungi UpdateValue
'Kasing lain
'Hubungi showerrmsg
Akhiri Pilih
3. Tentukan operasi, selesaikan operasi GetValue di sini, banyak di antaranya dapat dibuat menjadi modul publik untuk fungsi lain
Sconn = driver = {microsoft access driver (*.mdb)};
Setel oconn = server.CreateObject (adodb.connection)
Oconn.open sconn
SSQL = Pilih * Dari Pesan Pesan oleh ID Desc
setRs = server.CreateObject (adodb.oldset)
Ors.open ssql, oconn, 1, 1
'Dokumen XML Rekaman Konstruktif
Jika organ.eof dan kami
SXML = <?
<TestPacket> & vbcrlf & _
<sgtype> SystemResp </sgtype> & vbcrlf & _
<version> 1.0 </version> & vbcrlf & _
<rence> 0 </hasilnya> & vbcrlf & _
</testpacket>
akhiri jika
'Konstruksi memiliki rekor dokumen XML
Jika tidak (iates.eof dan ors.bof) lalu
lakukan sementara tidak om.eof
STMPXML = STMPXML & <MESSESS> & VBCRLF & _
<name> & org (nama) & </name> & vbcrlf & _
<Ege> & & & </anam> & vbcrlf & _
<neks> & & & </sex> & vbcrlf & _
<msg> & org (msg) & </msg> & vbcrf & _
</pesters> & vbcrlf
OnDenext
lingkaran
SXML = <?
<TestPacket> & vbcrlf & _
<sgtype> SystemResp </sgtype> & vbcrlf & _
<version> 1.0 </version> & vbcrlf & _
<rence> 1 </hasilnya> & vbcrlf & stmpxml & _
</testpacket>
akhiri jika
4. Data pengembalian
Set DOM = Server.CreateObject (msxml2.document)
odom.loadxml (sxml)
odom.save (respons)
atur odom = tidak ada
Pesan.mdb
-------------------------------------------------- ---------------------------------------------
Nama Basis Data: Message.mdb
Judul Data: Pesan
Bidang Data: Jenis Bidang
ID Nomor Otomatis
Nama Teks
Nomor Usia
teks seks
Keterangan MSG
Hasil Eksekusi:
-------------------------------------------------- ---------------------------------------------
Ketika saya mengatur resultFormat = teks httpservice, lihat hasil tampilan
Topik ini berisi lampiran: SF_200411813537.jpg (23359bytes)
Blog CSDN: http://blog.csdn.net/stefli
Stefli's MP3: http://stefli.88ip.net/flex/mp3player.swf