use_mail的博客

表单引擎系统是在完全WEB界面上可视化编辑的系统，可设置数据库的字段、属性，设置模块的配置。为企业信息管理人员或软件开发人员提供简单、快捷、高效的WEB表单设计和制作工具，无须书写任何程序代码即可轻松的与数据绑定并实现表单信息的储存和流转。

C#微信开发框架源码，三层架构，里面的 UI层、BLL层、DAL层，调用API层等 ，值得了解与学习。

var currentMsg: integer; procedure TForm1.CntClick(Sender: TObject); begin SakPOP1.Host := EditHost.text; SakPOP1.UserId := EditUserId.text; SakPOP1.UserPasswd := EditPasswd.text; StatusBar1.Panels[0].text := 'Wait a moment, please...'; SakPOP1.connect; if SakPOP1.POPError then begin MessageDlg( 'Connect failed. Maybe the server is down or not responding.', mtError, [mbOk], 0); exit; end; if not SakPOP1.login then begin ShowMessage('Unauthorized access...'); exit; end; SakPOP1.Init; showMessage( 'You have ' + intToStr( SakPOP1.MsgsCount) + ' new msg(s) '); BtnCancel.Enabled := true; sakPOP1.retrieveAllMessages( SakMsgList1); BtnCancel.Enabled := false; SakPOP1.Disconnect; if SakMsgList1.count > 0 then begin currentMsg := 0; showCurrentMsg; end; StatusBar1.Panels[0].text := 'Done. ' + intToStr( SakMsgList1.count) + ' msgs retrieved.'; end; procedure TForm1.ButtonPriorClick(Sender: TObject); begin if currentMsg > 0 then begin dec( currentMsg); showCurrentMsg; end; end; procedure TForm1.ButtonNextClick(Sender: TObject); begin if currentMsg < SakMsgList1.count-1 then begin inc( currentMsg); showCurrentMsg; end; end; procedure TForm1.showCurrentMsg; var msg: TSakMsg; i: integer; begin msg := SakMsgList1.items[ currentMsg]; labelMsgId.Caption := msg.MessageId; labelInReplyTo.Caption := msg.InReplyTo; labelFrom.caption := msg.From; labelTo.caption := msg.SendTo; labelSubject.caption := msg.Subject; labelDate.caption := msg.Date; labelReplyTo.Caption := msg.ReplyTo; labelReturnPath.Caption := msg.ReturnPath; labelContentType.Caption := msg.ContentType; LabelEncoding.Caption := msg.ContentTransferEncoding; LabelSender.Caption := msg.Sender; LabelCC.Caption := msg.CC; memo1.text := msg.Text.Text; {msg.Text is a StringList} if msg.AttachedFiles.Count > 0 then begin comboBoxAttach.items.clear; for i := 0 to msg.AttachedFiles.Count-1 do comboBoxAttach.items.add( msg.AttachedFiles[ i].fileName); comboBoxAttach.enabled := true; comboBoxAttach.itemIndex := 0; buttonSave.enabled := true; end else begin comboBoxAttach.enabled := false; buttonSave.enabled := false; end; end; procedure TForm1.ButtonSaveClick(Sender: TObject); begin saveDialog1.FileName := comboBoxAttach.text; if saveDialog1.execute then SakMsgList1[ currentMsg].AttachedFiles[ comboBoxAttach.itemIndex].saveToFile&#40; saveDialog1.FileName&#41;; end; procedure TForm1.SakPOP1AfterRetrieve(Sender: TObject); begin StatusBar1.Panels[0].text := 'Retrieving... ' + intToStr( SakMsgList1.count) + ' msg(s) retrieved'; end; procedure TForm1.SakPOP1DecodeProgress(Sender: TObject; Percent: Word); begin // ProgressBar1.Position := Percent; end; procedure TForm1.SakPOP1DecodeStart(Sender: TObject; FileName: String; BytesCount: Integer); begin // ProgressBar1.Position := 0; end; procedure TForm1.SakPOP1RetrieveProgress(Sender: TObject; Percent: Word); begin ProgressBar2.Position := Percent; end; procedure TForm1.SakPOP1Error(Sender: TObject; Error: Integer; Msg: String); begin ShowMessage( Msg); end; procedure TForm1.SakPOP1BeforeRetrieve(sender: TObject; id: Word); begin ProgressBar2.Position := 0; end;

SQL_Server不存在或访问被拒绝处理操作文档

目 录 第一章 绪　论 ………………………………………………………………3 §1.1 项目开发的背景 ………………………………………………………3　 §1.2 项目开发的目的 ………………………………………………………4 §1.3 项目开发的目标 ………………………………………………………4 §1.4 项目开发的意义 …………………………………………………4 第二章 项目开发总体设计 ………………………………………………………5 §2.1 应用需求分析 …………………………………………………………5 §2.2 系统功能流程图 ………………………………………………………8 §2.3 系统功能模块 ………………………………………………………9 §2.4 开发工具和平台 ………………………………………………………9 第三章 项目开发详细设计 …………………………………………………10 §3.1 系统登录功能的实现 ………………………………………………10 §3.2 系统功能界面的实现 ………………………………………………12 §3.3系统菜单功能的实现 ………………………………………………16 3.3.1添加用户信息功能的实现 ………………………………………16 3.3.2修改登录用户密码功能的实现 …………………………………18 3.3.3删用户信息功能的实现 …………………………………………20 3.3.4注销用户功能的实现 ……………………………………………20 3.3.5退出功能的实现 ………………………………………………20 §3.4读者信息管理功能的实现 ……………………………………………21 3.4.1添加读者信息功能的实现 ………………………………………21 3.4.2删除读者信息功能的实现 ……………………………………22 3.4.3修改读者信息功能的实现 ……………………………………24　 3.4.4读者信息查询功能的实现 ……………………………………25 §3.5图书信息管理功能的实现 ……………………………………………27 3.5.1添加图书信息功能的实现 ………………………………………27 3.5.2删除图书信息功能的实现 ………………………………………29 3.5.3修改图书信息功能的实现 ………………………………………30 3.5.4图书信息查询功能的实现 ………………………………………32 §3.6借阅管理功能的实现 …………………………………………………35 3.6.1借书信息功能的实现 ……………………………………………35 3.6.2还书信息功能的实现 …………………………………………37 3.6.3图书借阅信息一览的实现 ………………………………………39 §3.7报表功能的实现 ………………………………………………………40 §3.8Adodc和data控件与数据库连接的实现 ……………………………41 第四章 系统性能测试与分析……………………………………………………43 结束语 …………………………………………………………………………44 致 谢 …………………………………………………………………………45 参考文献 …………………………………………………………………………46