SQL查询分析器外挂源码分享
本人写了一个SQL查询分析器扩展工具,功能类似Delphi的ToDo。可以方便开发者在大量的SQL脚本中快速找到每个模块、To-Do,从而提高开发高利率。
使用的时候先运行SQL查询分析器,然后运行本程序即可(可以工具|自定义中配置)。按F2显示To-Do List窗口,按Alt+F2在当前位置插入To-Do。
由于时间关系,本程序并未完善,在双击To-Do Item后应没有将光标定位到对应的位置,希望高手赐教,有兴趣的朋友不防继续完善它,并发一份源码给我。万分谢谢。(QQ:462400756)
{================================================================}
{ todo.dpr
{================================================================}
program todo;
{%ToDo 'todo.todo'}
uses
Forms,
windows,
messages,
tdmain in 'tdmain.pas' {frmToDoMain},
tdcontainer in 'tdcontainer.pas' {frmContainer},
tdItem in 'tdItem.pas' {frmItem},
tdFilter in 'tdFilter.pas' {frmFilter};
{$R *.res}
var
h: Hwnd;
begin
Application.Initialize;
h := FindWindow(nil, PChar('frmContainer'));
if h = 0 then
begin
Application.CreateForm(TfrmContainer, frmContainer);
Application.CreateForm(TfrmToDoMain, frmToDoMain);
Application.CreateForm(TfrmItem, frmItem);
Application.CreateForm(TfrmFilter, frmFilter);
Application.ShowMainForm := False;
end;
h := FindWindow(nil, PChar('frmContainer'));
SendMessage(h, WM_RERUN, 0, 0);
Application.Run;
end.
{================================================================}
{ tdmain.pas
{================================================================}
unit tdmain;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ComCtrls, RegExpr, Tabs, Menus, StdCtrls, ImgList,
Grids, ExtCtrls;
type
TViewType = (vtTodo, vtModule);
TGroupType = (gtOwner, gtCategory);
TfrmToDoMain = class(TForm)
 
相关文档:
触发程序(trigger)是一种特殊型态的预存程序,当您使用Insert、Update或Delete命令来修改资料列时,Microsoft SQL Server会自动执行您所定义的触发程序。
触发程序(trigger) 是一种特殊的预存程序,执行特定的陈述式(Update、Insert 或 Delete)就可以啟动触发程序。触发 ......
一、具有主键的情况
I.具有唯一性的字段id(为唯一主键)
delete 用户表
where id not in
(
select max(id) from 用户表 group by col1,col2,col3...
)
group by 子句后跟的字段就是你用来判断重复的条件,如只有col1,
那么只要col1字段内容相同即表示记录相同。
II. ......
在现代的多用户多任务系统中,必然会出现多个用户同时访问共享的某个对象,这个对象可能是表,行,或者内存结构,为了解决多个用户并发性访问带来的数据的安全性,完整性及一致性问题,必须要有一种机制,来使对这些共享资源的并发性访问串行化,oracle中的锁就可以提供这样的功能,当事务在对某个对象进行操作前,先向系统 ......
1.查询出当前连接然后将其关闭
select spid
from master.dbo.sysprocesses
where dbid= db_id('数据库名')
--db_id('DoNet')
如spid 值为 52.
2. 執行:
kill 52
3.修改數據庫名
EXEC sp_dboption 'old_db_name', 'Single User', 'false'
&nb ......
Global.asax文件中
在页面跳转时,防止传值的参数中SQL注入:
void Application_BeginRequest(object sender, EventArgs e)
{
ProcessRequest();
}
void ProcessRequest()
{
try
......