httpservice 및 ASP의 의사 -웹 서비스 통신을 사용하여 데이터베이스 작업을 완료하십시오.
ASP에 대한 의사 서비스 아이디어를 제공합니다.
ClientReq.xml :
-------------------------------------------- ----------------------------------------------------------
<? xml 버전 = 1.0 인코딩 = gb2312?>
<testpacket>
<sgtype> getValuereq </msgtype>
<버전> 1.0 </버전>
</testpacket>
index.mxml :
-------------------------------------------- ----------------------------------------------------------
<mx : model id = mreq 소스 = 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 :
-------------------------------------------- ----------------------------------------------------------
주로 데이터 패킷, 데이터 패킷을 구문 분석, 지정된 작업 및 4 단계의 데이터로 돌아갑니다.
1. 제출 된 데이터 패킷을 받으십시오
set dom = server.createobject (msxml2.document)
ODOM.LOAD 요청
2. 데이터 패킷을 분석하고 msgtype을 얻습니다
smsgtype = trim (odom.selectsinglede (// msgtype) .text)
사례 SMSGTYPE를 선택하십시오
사례 getValuereq
GetValue에 전화하십시오
'Case DeleteValueq
'deleteValue를 호출하십시오
케이스 insertValueq
'insertValue (Odom) 호출
'사례 업데이트 valueq
'UpdateValue를 호출하십시오
'다른 경우
'샤워 rmsg에 전화하십시오
종료 선택
3. 작업을 지정하고 여기에서 GetValue 작업을 완료하며, 그 중 다수는 다른 기능을 위해 공개 모듈로 만들 수 있습니다.
sconn = driver = {Microsoft Access Driver (*.mdb)};
set 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와 우리 .bof라면
sxml = <? xml 버전 = 1.0 인코딩 = gb2312?> & vbcrlf & _
<testpacket> & vbcrlf & _
<sgtype> SystemResp </msgtype> & vbcrlf & _
<버전> 1.0 </version> & vbcrlf & _
<결과> 0 </결과> & vbcrlf & _
</testpacket>
끝 If
'Construction에는 레코드 XML 문서가 있습니다
그렇지 않은 경우 (iates.eof 및 ors.bof)
om.eof가 아니라
stmpxml = stmpxml & <메시지> & vbcrlf & _
<이름> & org (이름) & </name> & vbcrlf & _
<ege> & & & </age> & vbcrlf & _
<섹스> & & & </sex> & vbcrlf & _
<sg> & org (msg) & </msg> & vbcrf & _
</메시지> & vbcrlf
ondenext
고리
sxml = <? xml 버전 = 1.0 인코딩 = gb2312?> & vbcrlf & _
<testpacket> & vbcrlf & _
<sgtype> SystemResp </msgtype> & vbcrlf & _
<버전> 1.0 </version> & vbcrlf & _
<결과> 1 </결과> & vbcrlf & stmpxml & _
</testpacket>
끝 If
4. 반환 데이터
set dom = server.createobject (msxml2.document)
odom.loadxml (sxml)
Odom.save (응답)
Odom = 아무것도 설정하지 않습니다
message.mdb
-------------------------------------------- ----------------------------------------------------------
데이터베이스 이름 : message.mdb
데이터 제목 : 메시지
데이터 필드 : 필드 유형
ID 자동 번호
이름 텍스트
나이 번호
섹스 텍스트
MSG 비고
실행 결과 :
-------------------------------------------- ----------------------------------------------------------
resultformat = httpservice의 텍스트를 설정하면 디스플레이 결과를 참조하십시오.
이 주제에는 첨부 파일이 포함되어 있습니다 : SF_200411813537.JPG (23359BYTES)
CSDN 블로그 : http://blog.csdn.net/stefli
Stefli 's mp3 : http://stefli.88ip.net/flex/mp3player.swf