pb-http，webservice，db，api

inet非可视对象是PB中提供的专门用来和Internet交互的对象，使用该对象可以编写Internet处理程序。该对象使用时，需要首先创建一个继承自InternetResult对象的用户自定义对象，在该自定义对象上编写脚本对从Internet上返回的结果进行处理。下面我们给出一个实例，该实例从企业黄页之类的网站中获取各个企业的信息，保存到本地计算机中。这样的软件对于从事电话推销的公司是非常需要的。 
按照以下步骤开发该软件： 
1、创建一个Standard Class，选择InternetResult对象，然后在该对象缺省函数InternetData中编写如下脚本（我们希望将获取到的内容保存到文件中，文件的格式是HTML的）： 
String ls_filename 
string ls_content 
integer li_FileNum 
integer li_pos1,li_pos2 

ls_content = string(data) 
li_pos1 = Pos(ls_content,'<table align=center border=0 cellpadding=0 cellspacing=1>') 
li_pos2 = Pos(ls_content,'联系人') 
li_pos2 = pos(ls_content,'</table>',li_pos2) + len('</table>') - 1 
ls_content = Mid(ls_content,li_pos1,li_pos2 - li_pos1) 
if Pos(ls_content,'010') > 0 then 
ls_filename = String(now(),'hhmmss') + right('00000' + string(rand(100)),3) + '.htm' 
li_FileNum = FileOpen("d:/data/" + ls_filename, & 
StreamMode!, Write!, Shared!, Replace!) 
FileWrite(li_FileNum, ls_content) 
FileClose(li_FileNum) 
end if 

Return 1