摘要:
1 1. ASP与Access数据库连接: 2 3 <% 4 dim conn,mdbfile 5 mdbfile=server.mappath("数据库名称.mdb") 6 set conn=server.createobject("adodb.connection") 7 conn.open "driver={microsoft access driver (*.mdb)};uid=admin;pwd=数据库密码;dbq="&mdbfile 8 %> 9 10 11 2. ASP与SQL数据库连接: 12 13 阅读全文
摘要:
protected void Button1_Click(object sender, EventArgs e) { string FullFileName = this.flLl.PostedFile.FileName; string fileName = FullFileName.Substring(FullFileName.LastIndexOf("\\") + 1); this.txtimage.Text = "~/photo/"+ fileName; string type = fileName.Substring(fi... 阅读全文
摘要:
View Code 1 unit Unit1; 2 3 interface 4 5 uses 6 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 7 Dialogs, StdCtrls,comobj, ExtCtrls, DB, ADODB; 8 9 type 10 TForm1 = class(TForm) 11 Button1: TButton; 12 Edit1: TEdit; 13 Memo1: TMemo; 14 ... 阅读全文
摘要:
在IDC行业中,有许多的免费空间,而真正的免费空间又能有多少?我是一个草根站长,说实话,为了寻找一个很好的免费空间,我在网上找了好多,几乎所有的免费空间都用过,但当网站运行初具规模的时候,突然一天发现,我的网站没了,所有的数据全部丢失,这让我伤心了好久。没办法,谁叫俺们没钱!现在许多网站提供免费空间,大部分都是为了推销自己的网站,当到了一定的时候,就取消,而且本来网站的数据也会清空,连通知都没有,我想现在许多的草根站长也许也经历了许多。某天在网上继续寻找免费空间的时候,发现一些提供信息的网站都在推广云空间,一时心痒,跑去看看,没想到还真是的!不过我抱着观望的态度,当时并没有留在心上,继续做着网 阅读全文
摘要:
两个timer控件,其中timer1负责每一分钟检查一次系统时间和设定时间的差值,如果两者相差5分钟,则继续检查,直到当相差时间小于5分钟,触发timer2,timer2的定时器时间就是这个时间间隔。当timer2到时以后,就触发主程序。具体代码procedure TForm1.Button1Click(Sender: TObject);begin timer1.Interval:=60*1000; //启动监控,每1分钟检查一次设定时间和当前时间 timer1.Enabled:=true;end;procedure TForm1.Timer1Timer(Sender: TObject);va 阅读全文
摘要:
SQLConnection1.Params.clearSQLConnection1.Params.Values['ServerName'] := '192.168.0.112'; SQLConnection1.Params.Values['Database'] := 'trackData'; SQLConnection1.Params.Values['User_Name'] := 'sa'; SQLConnection1.Params.Values['Password'] := 阅读全文
摘要:
//AServerName, ADataName, AUser, Apass分别可以为服务器的IP地址\数据库名\用户名\密码 function getDataConnection(AServerName, ADataName, AUser, Apass:string); begin Result := 'Provider=SQLOLEDB.1;Password= ' + Apass + ';Persist Security Info=True;User ID= ' + AUser + ';Initia... 阅读全文