استخدم اتصالات خدمة HTTPSERVICE و ASP Pseudo -Web لإكمال عملية قاعدة البيانات
أقدم فكرة زائفة -خدمة ASP:
ClientReq.xml:
------------------------------------------------- -------------------------------------------
<إصدار XML؟
<Stpacket>
<sggtype> getValuereq </sggtype>
<splect> 1.0 </version>
</testpacket>
index.mxml:
------------------------------------------------- -------------------------------------------
<MX: معرف النموذج = mreq source = clientReq.xml/>
<mx: httpservice id = hs url = http: //asp/testserver.asp
resultformat = xml
الطريقة = post
contentType = Application/XML
showbusycursor = true>
<MX: طلب>
<xml> {mreq} </sml>
</mx: طلب>
</mx: httpservice>
TestServer.asp:
------------------------------------------------- -------------------------------------------
احصل بشكل أساسي على حزم البيانات ، وحزم البيانات ، والعمليات المحددة ، والعودة إلى أربع خطوات من البيانات
1. احصل على حزمة البيانات المقدمة
تعيين dom = server.createBject (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
'Call UpdateValue
قضية أخرى
استدعاء الدش
نهاية الاختيار
3. حدد العملية ، أكمل عملية getValue هنا ، يمكن تحويل الكثير منها إلى وحدات عامة للوظائف الأخرى
sconn = driver = {Microsoft Access Driver (*.mdb)} ؛
تعيين OConn = server.createBject (ADODB.CONNECTION)
Oconn.Open Sconn
SSQL = حدد * من ترتيب الرسائل عن طريق معرف DESC
setRs = server.createBject (adodb.oldset)
Ors.Open SSQL ، Oconn ، 1 ، 1
"السجل البناء وثيقة XML
إذا
SXML = <
<StestPacket> & vbcrlf & _
<SGTYPE> SYSTEMRESP </sggtype> و VBCRLF & _
<soph> 1.0 </version> & vbcrlf & _
<Repront> 0 </sult> & vbcrlf & _
</testpacket>
إنهاء إذا
البناء لديه مستند XML قياسي
إذا لم يكن (IATES.EOF و ORS.BOF) ثم
افعل بينما لا om.eof
STMPXML = STMPXML & <Messages> & VBCRLF & _
<name> & org (name) & </name> & vbcrlf & _
<ege> & & & </age> & vbcrlf & _
<sex> & & & </sex> & vbcrlf & _
<sgg> & org (msg) & </sg> & vbcrf & _
</messages> & vbcrlf
Ondenext
حلقة
SXML = <
<StestPacket> & vbcrlf & _
<SGTYPE> SYSTEMRESP </sggtype> و VBCRLF & _
<soph> 1.0 </version> & vbcrlf & _
<Repront> 1 </sult> & vbcrlf & stmpxml & _
</testpacket>
إنهاء إذا
4. إرجاع البيانات
تعيين dom = server.createBject (msxml2.document)
ODOM.LOADXML (SXML)
Odom.save (استجابة)
تعيين ODOM = لا شيء
message.mdb
------------------------------------------------- ---------------------------------------
اسم قاعدة البيانات: message.mdb
عنوان البيانات: الرسالة
حقل البيانات: نوع الحقل
معرف الرقم التلقائي
نص اسم
رقم العمر
نص الجنس
تصريحات MSG
نتائج التنفيذ:
------------------------------------------------- ---------------------------------------
عندما أقوم بتعيين resultformat = نص httpservice ، راجع نتائج الشاشة
يحتوي هذا الموضوع على مرفقات: SF_200411813537.jpg (23359bytes)
مدونة CSDN: http://blog.csdn.net/stefli
Stfli's mp3: http://stefli.88ip.net/flex/mp3player.swf