04 2012 档案

摘要:信息来源:西部E网问题背景 单位校园网搭建完成并投入使用以后,为老师们的工作提供了极大的便利,其中使用最频繁的是各办公室电脑之间的资料传输。起初我们使用“网上邻居”进行传输,但使用一段时间以后发现这种方式很不稳定,每次访问都需要一段时间的解析,并且还不利于管理。由于这些办公电脑都是基于WindowsXP专业版系统平台的,因此笔者决定利用WindowsXP自带的IIS为每台机器配置简单的FTP服务。按正确方法为每台电脑安装IIS并配置FTP服务后,当进行访问时,出现了问题:每台电脑只能在本机访问自己的FTP文件夹,其他电脑访问本机或本机访问其他电脑均不能正常进行。 分析解决 首先可以排除物... 阅读全文
posted @ 2012-04-24 09:11 Unique.Y 阅读(7456) 评论(0) 推荐(0)
摘要:if not ADOQuery1.Active then exit; if ADOQuery1.RecordCount<=0 then exit; PrintDBGridEh1.PageHeader.CenterText.Clear; PrintDBGridEh1.PageHeader.CenterText.Add(trim(edTiTle1.Text)); PrintDBGridEh1.PageHeader.CenterText.Add(''); PrintDBGridEh1.PageHeader.CenterText.Add(trim(edTiTle2.Text)); 阅读全文
posted @ 2012-04-11 23:21 Unique.Y 阅读(3672) 评论(0) 推荐(0)
摘要:type TForm1 = class(TForm) edt1: TEdit; btn1: TButton; procedure btn1Click(Sender: TObject); function getWeek:string; private { Private declarations } public { Public declarations } end;var Form1: TForm1;implementation{$R *.dfm}function Tform1.getWeek:string;var date:SYSTEMTIME;begin GetLocalTime(da 阅读全文
posted @ 2012-04-11 22:50 Unique.Y 阅读(171) 评论(0) 推荐(0)