SQL文加密
use Tempdb
go
if object_ID('fn_ACITEncryption') is not null
drop function fn_ACITEncryption
go
create function fn_ACITEncryption
(
@Str nvarchar(4000),--加密的字符串
@Flag bit=1,--1、加密 0、解密
@Key nvarchar(50)--密文
)
returns nvarchar(4000)--這里可轉換成二進制
with Encryption
as
begin
Declare @LenStr int,@i int,@Str2 nvarchar(4000),@Split nvarchar(2),@LenKey int
select @Str=@Str+'A',@LenStr=len(@Str),@i=1,@Str2='',@LenKey=Len(@Key+'A')-1
while @i<@LenStr
select @Split=substring(@Str,@i,1),
@Split=nchar((unicode(@Split)+case @Flag when 1 then unicode(substring(@Key+'A',@i%@LenKey+1,1))-1
when 0 then 65535-unicode(substring(@Key+'A',@i%@LenKey+1,1))
else 0 end)%65535+cast(@Flag as int)),
@Str2=@Str2+@Split,@i=@i+1
return @Str2
end
go
select dbo.fn_ACITEncryption(N'Roy',1,'123') as 加密后字符串
/*
加密后字符串
------------------------------
㢻
(1 個資料列受到影響)
*/
select dbo.fn_ACITEncryption(N'„¢ª',0,'123') as 解密后字符串
/*
解密后字符串
--------------------------
Roy
(1 個資料列受到影響)
*/
相关文档：
常用SQL查询：
1、查看表空间的名称及大小
select t.tablespace_name, round(sum(bytes/(1024*1024)),0) ts_size
from dba_tablespaces t, dba_data_files d
where t.tablespace_name = d.tablespace_name
group by t.tablespace_name;
2、查看表空间物理文件的名称及大小
select tablespace_name, file_id, ......
我使用delphi也不是很长时间，由于经常要用到SQL语句，总结了一些Delphi中使用SQL语句要注意的事项，归纳起来主要有一下几条：
一、空格不要漏：
我们经常要拼装SQL语句，特别是where条件句，在各个语句中别忘了头尾加上空格。因为在一个语句中我们会注意用空格分开关键字但是往往忘了头尾的空格。例如：
sSQL=' select ......
--跨服务器查询如下：
SELECT a.*,b.stor_Name
from OPENROWSET('MSDASQL',
'DRIVER={SQL Server};SERVER=tom;UID=sa;PWD=123',
pubs.dbo.authors) AS a,stores b
ORDER BY a.au_lname, a.au_fname
--其中，tom为远程服务器名，stores 是本机数据库pubs中的表
--需要注意的是若二个表中的 ......
新装或者以前装过sql server，后来删掉。现在重装，会出现“以前的某个程序安装已在安装计算机上创建挂起的文件操作，运行安装程序之前必须重新启动计算机”错误。无法进行下去。
以下为解决步骤：
1）添加/删除程序中彻底删除sql server。
2）将没有删除的sql server目录也删除掉。
3）打开注册表编辑器� ......
select语句中只能使用sql函数对字段进行操作（链接sql server），
select 字段1 from 表1 where 字段1.IndexOf("云")=1;
这条语句不对的原因是indexof（）函数不是sql函数，改成sql对应的函数就可以了。
left（）是sql函数。
select 字段1 from 表1 where charindex（'云',字段1）=1; 字符串函数对二进制数据、字符串和 ......
