12 2017 档案

统计MSSQL数据库中所有表记录的数量
摘要：SELECT a.name as '表名', b.rows as '记录数' FROM sysobjects AS aINNER JOIN sysindexes AS b ON a.id = b.idWHERE (a.type = 'u') AND (b.indid IN (0, 1))ORDER 阅读全文
posted @ 2017-12-29 22:18 bingege 阅读(2152) 评论(0) 推荐(0)
Delphi获得与设置系统时间格式《转》
摘要：unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, V 阅读全文
posted @ 2017-12-17 23:05 bingege 阅读(1107) 评论(0) 推荐(0)
SQl查询数据库表名、表的列名、数据类型、主键
摘要：1.获取所有数据库名: 2.Select Name FROM Master..SysDatabases order by Name 3. 4.2.获取所有表名: 5. (1) 6.Select Name FROM SysObjects Where XType='U' orDER BY Name 7. 阅读全文
posted @ 2017-12-17 11:32 bingege 阅读(2567) 评论(0) 推荐(0)
delphi中检测局域网ip能够ping通模块
摘要：// 函数PingHost用于ping目标IP是否连通 // uses winsock 在uses中加入 winsock // 用法： if PingHost(edit2.Text) then edit1.Text:='已连接' else edit1.Text:='未连接' ; function T 阅读全文
posted @ 2017-12-02 10:33 bingege 阅读(1686) 评论(0) 推荐(0)