ใช้การสื่อสารบริการ httpservice และ ASP ของ ASP เพื่อให้การดำเนินการฐานข้อมูลเสร็จสิ้น
ฉันให้แนวคิดแบบหลอกสำหรับ ASP:
clientreq.xml:
----------------------------------------------- -------------------------------------
<? XML เวอร์ชัน = 1.0 การเข้ารหัส = GB2312?>
<TestPacket>
<sgtype> getValuereq </sgtype>
<Sersion> 1.0 </Sersion>
</testpacket>
index.mxml:
----------------------------------------------- -------------------------------------
<mx: model id = mreq source = clientreq.xml/>
<mx: httpservice id = hs url = http: //asp/testserver.asp
resultFormat = xml
วิธี = โพสต์
ContentType = Application/XML
showbusycursor = true>
<mx: คำขอ>
<XML> {MREQ} </xml>
</mx: คำขอ>
</mx: httpservice>
testserver.asp:
----------------------------------------------- -------------------------------------
ส่วนใหญ่จะได้รับแพ็คเก็ตข้อมูลการแยกวิเคราะห์แพ็คเก็ตข้อมูลการดำเนินการที่ระบุและกลับสู่สี่ขั้นตอนของข้อมูล
1. รับแพ็คเก็ตข้อมูลที่ส่ง
ตั้งค่า dom = server.createObject (msxml2.document)
คำขอ odom.load
2. วิเคราะห์แพ็คเก็ตข้อมูลและรับ msgType
smsgType = trim (odom.selectsinglede (// msgtype) .Text)
เลือก case smsgtype
กรณี getValuereq
โทรหา getValue
'case deleteValueq
'เรียก deletevalue
case insertvalueq
'call insertvalue (Odom)
'case updateValueq
'โทรอัปเดต
'กรณีอื่น
'โทรอาบน้ำ RMSG
สิ้นสุดเลือก
3. ระบุการดำเนินการเสร็จสิ้นการดำเนินการ getValue ที่นี่ซึ่งส่วนใหญ่สามารถทำเป็นโมดูลสาธารณะสำหรับฟังก์ชั่นอื่น ๆ
sconn = driver = {microsoft access driver (*.mdb)};
ตั้งค่า oconn = server.createObject (adodb.connection)
oconn.open sconn
ssql = select * จากลำดับข้อความโดย id desc
setRs = server.createObject (adoDb.oldset)
ors.open ssql, oconn, 1, 1
'เอกสาร XML บันทึกที่สร้างสรรค์
ถ้า organ.eof และ urs.bof แล้ว
sxml = <?
<TestPacket> & vbcrlf & _
<SgType> SystemResp </sgtype> & vbcrlf & _
<Sersion> 1.0 </Sersion> & VBCRLF & _
<result> 0 </result> & vbcrlf & _
</testpacket>
สิ้นสุดถ้า
'การก่อสร้างมีเอกสาร XML บันทึก
ถ้าไม่ใช่ (iates.eof และ ors.bof) แล้ว
ทำในขณะที่ไม่ใช่ om.eof
stmpxml = stmpxml & <sessions> & vbcrlf & _
<name> & org (ชื่อ) & </name> & vbcrlf & _
<Ege> & & </age> & vbcrlf & _
<ex> & & </sux> & vbcrlf & _
<sg> & org (msg) & </sg> & vbcrf & _
</messages> & vbcrlf
ondenext
วง
sxml = <?
<TestPacket> & vbcrlf & _
<SgType> SystemResp </sgtype> & vbcrlf & _
<Sersion> 1.0 </Sersion> & VBCRLF & _
<result> 1 </result> & vbcrlf & stmpxml & _
</testpacket>
สิ้นสุดถ้า
4. ส่งคืนข้อมูล
ตั้งค่า dom = server.createObject (msxml2.document)
odom.loadxml (sxml)
odom.save (การตอบสนอง)
ตั้งค่า odom = ไม่มีอะไร
message.mdb
----------------------------------------------- -------------------------------------
ชื่อฐานข้อมูล: message.mdb
ชื่อข้อมูล: ข้อความ
ฟิลด์ข้อมูล: ประเภทฟิลด์
หมายเลขอัตโนมัติ id
ชื่อข้อความ
หมายเลขอายุ
ข้อความเพศ
คำพูดของข้อความ
ผลการดำเนินการ:
----------------------------------------------- -------------------------------------
เมื่อฉันตั้งค่าผลลัพธ์ = ข้อความของ httpservice ดูผลลัพธ์ของการแสดงผล
หัวข้อนี้มีไฟล์แนบ: SF_200411813537.jpg (23359Bytes)
บล็อก csdn: http://blog.csdn.net/stefli
stefli's mp3: http://stefli.88ip.net/flex/mp3player.swf