請教各位有經驗的先進，目前小弟有個需求，是必須取得環保署即時空氣品質資料。環保署有提供WebService服務，但是嘗試了很久始終無法取得正確的資料，比如要取得所有測站代號，卻回傳「INTERR」的訊息。小弟也參考過許多範例但還是失敗，請有經驗的前輩測試看看是否也可以傳回正確的資料。在此請各位前輩不吝指教，謝謝。

環保署WebService：http://taqm.epa.gov.tw/taqm/DataService.asmx
環保署WSDL：http://taqm.epa.gov.tw/taqm/DataService.asmx?WSDL

小弟自行撰寫的程式碼，因為目前測試用，所以寫得很簡單，也請前輩們看看是否有錯誤，謝謝。

[code delphi]
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, InvokeRegistry, StdCtrls, Rio, SOAPHTTPClient, SOAPHTTPTrans;
type
TForm1 = class(TForm)
Memo1: TMemo;
HTTPRIO1: THTTPRIO;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
uses DdataService;
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
idataservice:DataServiceSoap;
begin
memo1.Clear;
iDataService:=HttpRio1 As DataServiceSoap;
memo1.Lines.Add(iDataService.SiteList('xml'));
ShowMessage('Ok');
end;
end.
[/code]

編輯記錄

 我目前試著用bcb6，結果會和你相同(失敗)

後來改用Delphi 2010，發現它可以正確擷取資料耶！(成功)

這其中到底有什麼奧秘…我就不知道了。

該不會是編碼的問題
將 ISO-8859 或是 BIG5 的編碼資料送給 UTF-8 的 Web Service 會爛掉的

------
http://blog.bestlong.idv.tw/
http://www.bestlong.idv.tw/
http://delphi-ktop.bestlong.idv.tw/

delphi win32 call .NET 的WS SOAP 有些格式上的問題,
建議
使用 'MSSOAP.SoapClient' CALL WS.

請教各位有經驗的先進，目前小弟有個需求，是必須取得環保署即時空氣品質資料。環保署有提供WebService服務，但是嘗試了很久始終無法取得正確的資料，比如要取得所有測站代號，卻回傳「INTERR」的訊息。小弟也參考過許多範例但還是失敗，請有經驗的前輩測試看看是否也可以傳回正確的資料。在此請各位前輩不吝指教，謝謝。

環保署WebService：http://taqm.epa.gov.tw/taqm/DataService.asmx
環保署WSDL：http://taqm.epa.gov.tw/taqm/DataService.asmx?WSDL

小弟自行撰寫的程式碼，因為目前測試用，所以寫得很簡單，也請前輩們看看是否有錯誤，謝謝。

[code delphi]
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, InvokeRegistry, StdCtrls, Rio, SOAPHTTPClient, SOAPHTTPTrans;
type
TForm1 = class(TForm)
Memo1: TMemo;
HTTPRIO1: THTTPRIO;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
uses DdataService;
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
idataservice:DataServiceSoap;
begin
memo1.Clear;
iDataService:=HttpRio1 As DataServiceSoap;
memo1.Lines.Add(iDataService.SiteList('xml'));
ShowMessage('Ok');
end;
end.
[/code]

編輯記錄

沒錯，Delphi 6 + HTTPRIO 發出的SOAP封包會和官網的範例不太一樣，可能就是造成INTERR的主因。
(不過此問題卻在Delphi 2010 SOAP 1.2後可以得到解決)

果然微軟開發的產品還是得用微軟的工具才有最佳的相容性啊~

今天早上試了一下HikaruGo大所說的MSSOAP.SOAPClient。
在BCB6下也可以正常擷取耶！真是太厲害了啦！HikaruGo大大！


===================引 用 HikaruGo 文 章===================

delphi win32 call .NET 的WS SOAP 有些格式上的問題,
建議
使用 'MSSOAP.SoapClient' CALL WS.

===================引 用 GrandRURU 文 章===================
沒錯，Delphi 6 HTTPRIO 發出的SOAP封包會和官網的範例不太一樣，可能就是造成INTERR的主因。
(不過此問題卻在Delphi 2010 SOAP 1.2後可以得到解決)

果然微軟開發的產品還是得用微軟的工具才有最佳的相容性啊~

今天早上試了一下HikaruGo大所說的MSSOAP.SOAPClient。
在BCB6下也可以正常擷取耶！真是太厲害了啦！HikaruGo大大！


===================引 用 HikaruGo 文 章===================

delphi win32 call .NET 的WS SOAP 有些格式上的問題,
建議
使用 'MSSOAP.SoapClient' CALL WS.

那算是微軟的外掛程式，詳細：
http://delphi.ktop.com.tw/board.php?cid=30&fid=68&tid=98015
這是HikaruGo大發的教學文章。

===================引 用 ESCAPE 文 章===================

GrandRURU 大大你好!!

小弟第一次嚐試的要寫 web service 的程式， 也是用 bcb6

你說到的：
"今天早上試了一下HikaruGo大所說的MSSOAP.SOAPClient。
在BCB6下也可以正常擷取耶！"

是否能提供 sourcecode ，給小弟參考，謝謝您!!!


===================引 用 GrandRURU 文 章===================
沒錯，Delphi 6 HTTPRIO 發出的SOAP封包會和官網的範例不太一樣，可能就是造成INTERR的主因。
(不過此問題卻在Delphi 2010 SOAP 1.2後可以得到解決)

果然微軟開發的產品還是得用微軟的工具才有最佳的相容性啊~

今天早上試了一下HikaruGo大所說的MSSOAP.SOAPClient。
在BCB6下也可以正常擷取耶！真是太厲害了啦！HikaruGo大大！


===================引 用 HikaruGo 文 章===================

delphi win32 call .NET 的WS SOAP 有些格式上的問題,
建議
使用 'MSSOAP.SoapClient' CALL WS.

===================引 用 salo0610 文 章===================
GrandRURU大大你好!!

小弟第一次嚐試的要寫 web service 的程式， 也是用 bcb6

你說到的：
"今天早上試了一下HikaruGo大所說的MSSOAP.SOAPClient。
在BCB6下也可以正常擷取耶！"

是否能提供 sourcecode ，給小弟參考，謝謝您!!!


===================引 用 GrandRURU 文 章===================
沒錯，Delphi 6 HTTPRIO 發出的SOAP封包會和官網的範例不太一樣，可能就是造成INTERR的主因。
(不過此問題卻在Delphi 2010 SOAP 1.2後可以得到解決)

果然微軟開發的產品還是得用微軟的工具才有最佳的相容性啊~

今天早上試了一下HikaruGo大所說的MSSOAP.SOAPClient。
在BCB6下也可以正常擷取耶！真是太厲害了啦！HikaruGo大大！


===================引 用 HikaruGo 文 章===================

delphi win32 call .NET 的WS SOAP 有些格式上的問題,
建議
使用 'MSSOAP.SoapClient' CALL WS.