delphi局域网访问

A. delphi局域网通信

具体语句是：
<%
Strfolder = Request.Form("newsDate")
set fso=Server.CreateObject("Scripting.FileSystemObject")
set objfolder = fso.CreateFolder(Server.mappath(Strfolder))
dim Rs5_total
Rs5_total = 1
%>
错误版语句是：权
set objfolder = fso.CreateFolder(Server.mappath(Strfolder))

B. 如何用Delphi实现局域网内消息传递

向窗体上添加两个TLabel组件、两个TEdit组件和一个TButton组件，设计完成的主界面如图。