加密文件夹代码源

Ⅰ 怎么用VB给文件夹加密

1、由于采用二进制读取文件的方式，因此加密时一般可以不考虑文件类型。
2、这里只进行一次异或运算，如有需要可以进行多次异或运算。
3、此加密算法速度快，当然加密强度也低 ；
参考代码如下：

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44

'-----------------------------------------------------------------------
'函数说明： 使用异或运算加密文件（可加密大部分文件）
'参数说明： key - 密钥
' fileName - 普通文件名，
' encryptFileName - 加密后的文件名
'返回值： true - 成功，false - 失败
'-----------------------------------------------------------------------
Private Function XOR_Encrypt(key As Integer, fileName As String, encryptFileName As String) As Boolean
On Error GoTo errHandler
Dim inputFileNo As Integer
Dim fileBytes() As Byte
Dim length As Long
XOR_Encrypt = False
'打开文件并保存在二进制数组中
inputFileNo = FreeFile
Open fileName For Binary As #inputFileNo
length = LOF(inputFileNo)
If length = 0 Then
MsgBox "退出加密：文件内容为空！", vbInformation, "提示"
Exit Function
End If
ReDim fileBytes(length - 1) As Byte
Get inputFileNo, , fileBytes()
Close #inputFileNo
'将该二进制数组进行异或加密
Dim i As Long
For i = LBound(fileBytes) To UBound(fileBytes)
fileBytes(i) = fileBytes(i) Xor key
Next
'将异或加密后的二进制数组保存在新的文件中
Dim outputFileNo As Integer
outputFileNo = FreeFile
Open encryptFileName For Binary As #outputFileNo
Put outputFileNo, , fileBytes
Close #outputFileNo
XOR_Encrypt = True

errHandler:
If Err.Number Then
MsgBox "加密过程中出错：" & Err.Description, vbCritical, "错误"
XOR_Encrypt = False
Resume Next
End If
End Function

Ⅱ 跪求一个VC++编写的文件夹加密软件代码（要完整代码 o(∩_∩)o...）

// AesCodeDlg.cpp : implementation file
//

#include "stdafx.h"
#include "AesCode.h"
#include "AesCodeDlg.h"

#include "Aes.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// CAboutDlg dialog used for App About

class CAboutDlg : public CDialog
{
public:
CAboutDlg();

// Dialog Data
//{{AFX_DATA(CAboutDlg)
enum { IDD = IDD_ABOUTBOX };
//}}AFX_DATA

// ClassWizard generated virtual function overrides
//{{AFX_VIRTUAL(CAboutDlg)
protected:
virtual void DoDataExchange(CDataExchange* pDX); // DDX/DDV support
//}}AFX_VIRTUAL

// Implementation
protected:
//{{AFX_MSG(CAboutDlg)
//}}AFX_MSG
DECLARE_MESSAGE_MAP()
};

CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
{
//{{AFX_DATA_INIT(CAboutDlg)
//}}AFX_DATA_INIT
}

void CAboutDlg::DoDataExchange(CDataExchange* pDX)
{
CDialog::DoDataExchange(pDX);
//{{AFX_DATA_MAP(CAboutDlg)
//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
//{{AFX_MSG_MAP(CAboutDlg)
// No message handlers
//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CAesCodeDlg dialog

CAesCodeDlg::CAesCodeDlg(CWnd* pParent /*=NULL*/)
: CDialog(CAesCodeDlg::IDD, pParent)
{
//{{AFX_DATA_INIT(CAesCodeDlg)
// NOTE: the ClassWizard will add member initialization here
//}}AFX_DATA_INIT
// Note that LoadIcon does not require a subsequent DestroyIcon in Win32
m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void CAesCodeDlg::DoDataExchange(CDataExchange* pDX)
{
CDialog::DoDataExchange(pDX);
//{{AFX_DATA_MAP(CAesCodeDlg)
DDX_Control(pDX, IDC_EnDeProg, m_prog);
//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CAesCodeDlg, CDialog)
//{{AFX_MSG_MAP(CAesCodeDlg)
ON_WM_SYSCOMMAND()
ON_WM_PAINT()
ON_WM_QUERYDRAGICON()
ON_BN_CLICKED(IDC_BAesEn, OnBAesEn)
ON_BN_CLICKED(IDC_BAesDe, OnBAesDe)
ON_BN_CLICKED(IDC_BFile, OnBFile)
ON_BN_CLICKED(IDC_BFileEn, OnBFileEn)
ON_BN_CLICKED(IDC_BFileDe, OnBFileDe)
//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CAesCodeDlg message handlers

BOOL CAesCodeDlg::OnInitDialog()
{
CDialog::OnInitDialog();

// Add "About..." menu item to system menu.

// IDM_ABOUTBOX must be in the system command range.
ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
ASSERT(IDM_ABOUTBOX < 0xF000);

CMenu* pSysMenu = GetSystemMenu(FALSE);
if (pSysMenu != NULL)
{
CString strAboutMenu;
strAboutMenu.LoadString(IDS_ABOUTBOX);
if (!strAboutMenu.IsEmpty())
{
pSysMenu->AppendMenu(MF_SEPARATOR);
pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
}
}

// Set the icon for this dialog. The framework does this automatically
// when the application's main window is not a dialog
SetIcon(m_hIcon, TRUE); // Set big icon
SetIcon(m_hIcon, FALSE); // Set small icon

// TODO: Add extra initialization here
SetDlgItemText(IDC_EAesEn,"0123456789abcdef");
EnDe_filename="";
m_prog.SetRange(0,100);
m_prog.SetPos(0);
return TRUE; // return TRUE unless you set the focus to a control
}

void CAesCodeDlg::OnSysCommand(UINT nID, LPARAM lParam)
{
if ((nID & 0xFFF0) == IDM_ABOUTBOX)
{
CAboutDlg dlgAbout;
dlgAbout.DoModal();
}
else
{
CDialog::OnSysCommand(nID, lParam);
}
}

// If you add a minimize button to your dialog, you will need the code below
// to draw the icon. For MFC applications using the document/view model,
// this is automatically done for you by the framework.

void CAesCodeDlg::OnPaint()
{
if (IsIconic())
{
CPaintDC dc(this); // device context for painting

SendMessage(WM_ICONERASEBKGND, (WPARAM) dc.GetSafeHdc(), 0);

// Center icon in client rectangle
int cxIcon = GetSystemMetrics(SM_CXICON);
int cyIcon = GetSystemMetrics(SM_CYICON);
CRect rect;
GetClientRect(&rect);
int x = (rect.Width() - cxIcon + 1) / 2;
int y = (rect.Height() - cyIcon + 1) / 2;

// Draw the icon
dc.DrawIcon(x, y, m_hIcon);
}
else
{
CDialog::OnPaint();
}
}

// The system calls this to obtain the cursor to display while the user drags
// the minimized window.
HCURSOR CAesCodeDlg::OnQueryDragIcon()
{
return (HCURSOR) m_hIcon;
}
////////////////////////////////////////////////////////////////////////////////////////////////
//Aes字符串加密
void CAesCodeDlg::OnBAesEn()
{
// TODO: Add your control notification handler code here
unsigned char inBuff[25],ouBuff[25];
memset(inBuff,0,25);
memset(ouBuff,0,25);

Aes aes(24,(unsigned char*)"\x0\x1\x2\x3\x4\x5\x6\x7\x8\x9\xa\xb\xc\xd\xe\xf\x10\x11\x12\x13\x14\x15\x16\x17");

GetDlgItemText(IDC_EAesEn,(char*)inBuff,24);
if(strlen((char*)inBuff)>16)MessageBox("本例只能加密16字节的字符串，大于截断");

aes.Cipher(inBuff,ouBuff); //因为输出为16个字节，每个字节用两个字母或数字表示。
CString str="",strTmp; //实际输出是32个字母或数字,否则ASCII码值超出127的会变成乱码。
for(int i=0;i<16;i++)
{
strTmp.Format("%02x",ouBuff[i]); //其实相当于把ouBuff的ASCII值这个数字以16进制的形式输出
str+=strTmp;
}
//MessageBox(str,"加密后");
SetDlgItemText(IDC_EAesEn,str);
}
////////////////////////////////////////////////////////////////////////////////////////////////
//Aes字符串解密
void CAesCodeDlg::OnBAesDe()
{
// TODO: Add your control notification handler code here
unsigned char inBuff[33],ouBuff[25]; //还是要注意32个字符的字符串需要用33个字节来存储，
//因为有个结束符，太恶心了
memset(inBuff,0,32);
memset(ouBuff,0,25);

Aes aes(24,(unsigned char*)"\x0\x1\x2\x3\x4\x5\x6\x7\x8\x9\xa\xb\xc\xd\xe\xf\x10\x11\x12\x13\x14\x15\x16\x17");
GetDlgItemText(IDC_EAesEn,(char*)inBuff,33);
unsigned char temp[25];
for(int j=0;j<16;j++)
{
temp[j]=char2num(inBuff[2*j])*16+char2num(inBuff[2*j+1]);// 将字符字面表示的16进制ASCII码值转换成真正的ASCII码值
}

aes.InvCipher(temp,ouBuff);//"dda97ca4......ec0d7191"

SetDlgItemText(IDC_EAesDe,CString(ouBuff));
}

////////////////////////////////////////////////////////////////////////////////////////////////
//字符ASCII码值到字符字面值的转换 如 '0'转换成0， 'a'转换成10
int CAesCodeDlg::char2num(char ch)
{
if(ch>='0'&&ch<='9')return ch-'0';
else if(ch>='a'&&ch<='f')return ch-'a'+10;
return -1;
}
////////////////////////////////////////////////////////////////////////////////////////////////
//文件选择框
void CAesCodeDlg::OnBFile()
{
// TODO: Add your control notification handler code here
CFileDialog fdlg(1,NULL,NULL,OFN_HIDEREADONLY ,"All Files(*.*)|*.*||");
if(IDOK!=fdlg.DoModal())return;
EnDe_filename=fdlg.GetPathName();
SetDlgItemText(IDC_EFile,EnDe_filename);
}
////////////////////////////////////////////////////////////////////////////////////////////////
//Aes文件加密
void CAesCodeDlg::OnBFileEn()
{
// TODO: Add your control notification handler code here
if(EnDe_filename=="")return;
FILE* finput;
FILE* foutput;
finput=fopen((LPCTSTR)EnDe_filename,"rb");
if(!finput)
{
MessageBox("文件打开错误","出错",MB_OK);
return;
}
fseek(finput,0,SEEK_END);
long lFileLen=ftell(finput); //ftell()函数返回文件位置指示符的当前值，即如果现在是在文件结尾，则这个值就是文件长度
fseek(finput,0,SEEK_SET);
long blocknum=lFileLen/16;
long leftnum=lFileLen%16;
EnDe_filename+=".en";
foutput=fopen((LPCTSTR)EnDe_filename,"wb");
if(!foutput)
{
MessageBox("文件打开错误","出错",MB_OK);
fclose(finput);
return;
}
unsigned char inBuff[25],ouBuff[25];
Aes aes(16,(unsigned char*)"\x0\x1\x2\x3\x4\x5\x6\x7\x8\x9\xa\xb\xc\xd\xe\xf");
for(long i=0;i<blocknum;i++)
{
fread(inBuff,1,16,finput); //读取16个对象，每个对象的长度是1字节
aes.Cipher(inBuff,ouBuff);
fwrite(ouBuff,1,16,foutput);
m_prog.SetPos(int(100*i/blocknum)); //加密进度条进度设置
}
if(leftnum)
{
memset(inBuff,0,16);
fread(inBuff,1,leftnum,finput);
aes.Cipher(inBuff,ouBuff);
fwrite(ouBuff,1,16,foutput);
}
fclose(finput);
fclose(foutput);
MessageBox("加密成功！");
SetDlgItemText(IDC_EFile,EnDe_filename);
m_prog.SetPos(0);
}
////////////////////////////////////////////////////////////////////////////////////////////////
//Aes文件解密
void CAesCodeDlg::OnBFileDe()
{
// TODO: Add your control notification handler code here
if(EnDe_filename=="")return;
FILE* finput;
FILE* foutput;
finput=fopen((LPCTSTR)EnDe_filename,"rb");
if(!finput)
{
MessageBox("文件打开错误","出错",MB_OK);
return;
}
fseek(finput,0,SEEK_END);
long lFileLen=ftell(finput); //ftell()函数返回文件位置指示符的当前值，即如果现在是在文件结尾，则这个值就是文件长度
fseek(finput,0,SEEK_SET);
long blocknum=lFileLen/16;
long leftnum=lFileLen%16;
EnDe_filename+=".de";
foutput=fopen((LPCTSTR)EnDe_filename,"wb");
if(!foutput)
{
MessageBox("文件打开错误","出错",MB_OK);
fclose(finput);
return;
}
unsigned char inBuff[25],ouBuff[25];
Aes aes(16,(unsigned char*)"\x0\x1\x2\x3\x4\x5\x6\x7\x8\x9\xa\xb\xc\xd\xe\xf");
for(long i=0;i<blocknum;i++)
{
fread(inBuff,1,16,finput); //读取16个对象，每个对象的长度是1字节
aes.InvCipher(inBuff,ouBuff);
fwrite(ouBuff,1,16,foutput);
m_prog.SetPos(int(100*i/blocknum)); //加密进度条进度设置
}
if(leftnum)
{
MessageBox("文件可能已损坏或非经aes加密过");
}
fclose(finput);
fclose(foutput);
MessageBox("解密成功！");
SetDlgItemText(IDC_EFile,EnDe_filename);
m_prog.SetPos(0);
}
要源程序和全部代码给我邮箱我给你发过去。

Ⅲ 如何用代码给文件夹加密

方法一：利用文件本身的属性对文件进行隐身

准备工作：电脑一台，有效文件夹一个

具体步骤：首先，我们找到需要加密的文件夹。右击打开“属性”，然后选择“隐藏”。其次再选择“将更改应用于此文件夹、子文件夹和文件”，再单击回车确定。这个时候我们的文件就已经隐身成功了。那么怎么样将其恢复打开呢?我们首先要选择工具栏，将其打开然后选择“文件夹选项”。再是在“查看”中选择“显示隐藏的文件、文件夹和驱动器”，再单击回车确定就可以了。

方法二：利用文件压缩加密

准备工作：电脑一台，有效文件夹一个，压缩文件一个(比如说：WinRAR)

具体步骤：首先，找到要加密的文件夹。然后右击选择WinRAR中的“添加到压缩文件”。操作成功后，我们可以看到一个对话框，在其对话框里面设置解压缩的密码。设置好之后，点击“确定”，将文件压缩成功就可以了，然后我们将原文件删除即可。想要查看文件的时候，我们只需要将其压缩包解压即可，不过大家可要牢记解压密码哦!

方法三：加密软件

准备工作：电脑一台，有效文件夹一个，加密软件一个

具体步骤：在网上下载好适宜的加密软件将其安装即可，注册账号。加密软件它有一定的要求，我们要在磁盘上给其单独的划分一个区来作为它的库，并且设置好它的位置，大小以及密码就可以。那么将文件移进加密软件可以了，要查看的时候输入密码就可以打开加密文件了。

综上所述：上述三种办法都是可以对文件夹来进行加密的，并且它们有自己各自的优缺点。大家在选择哪种办法进行加密的时候，可以按照个人的需求来决定，不过加密的秘密是一定要记住的哦!

Ⅳ （不限语言Java C# C都可以）简单点的文件夹加密工具软件源代码

闪晓风我推荐你用文件夹加密超级大师，文件夹加密超级大师支持所有windows系统，

可以加密文件夹，加密文件，保护磁盘和数据粉碎，使用起来非常方便。

在需要加密的文件和文件夹上单击鼠标右键选择加密就可以了。

解密时只要双击加密的文件夹和文件，输入正确的密码就可以解密。

文件夹加密超级大师加密后的文件和文件夹可以防止删除、复制和移动。

相对于其他的文件夹加密软件和文件加密软件，功能和性能还有操作都更加的出色。

并且有微软、360和金山的安全认证，是一款绝对安全的文件夹加密软件。

闪晓风您可以到网络上下载文件夹加密超级大师来给您的文件和文件夹加密，看看使用效果怎么样？

Ⅳ 怎样用VB给文件夹进行密码加密

文件或文件夹的加密、解密

'此方法对 WinXP 系统有效，Win98 没试验过。小心：不能用于系统文件或文件夹，否则会使系统瘫痪。
'加密：利用 API 函数在文件或文件夹名称末尾添上字符“..\”。比如，将文件夹“MyPath”更名为“MyPath..\”，在我的电脑中显示的名称就是“MyPath.”。系统会无法识别，此文件或文件夹就无法打开和修改，也无法删除。着名的病毒 Autorun 就是玩的这个小把戏。
'解密：去掉文件或文件夹名称末尾的字符“..\”

'将以下代码复制到 VB 的窗体代码窗口即可
'例子需控件：Command1、Command2、Text1，均采用默认属性设置
Private Const MAX_PATH = 260
Private Type FileTime ' 8 Bytes
LTime As Long
HTime As Long
End Type
Private Type Win32_Find_Data
dwFileAttributes As Long
ftCreationTime As FileTime
ftLastAccessTime As FileTime
ftLastWriteTime As FileTime
nFileSizeHigh As Long
nFileSizeLow As Long
dwReserved0 As Long
dwReserved1 As Long
cNameFile As String * MAX_PATH
cAlternate As String * 14
End Type
Private Declare Function MoveFileEx Lib "kernel32" Alias "MoveFileExA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal dwFlags As Long) As Long
Private Declare Function GetShortPathName Lib "kernel32" Alias "GetShortPathNameA" (ByVal lpszLongPath As String, ByVal lpszShortPath As String, ByVal cchBuffer As Long) As Long
Private Declare Function FindFirstFile Lib "kernel32" Alias "FindFirstFileA" (ByVal lpNameFile As String, lpFindFileData As Win32_Find_Data) As Long
Private Declare Function FindNextFile Lib "kernel32" Alias "FindNextFileA" (ByVal hFindFile As Long, lpFindFileData As Win32_Find_Data) As Long
Private Declare Function FindClose Lib "kernel32" (ByVal hFindFile As Long) As Long
Private Sub Form_Load()
Text1.Text = "C:\MyPath"
Command1.Caption = "解密": Command2.Caption = "加密"
Me.Caption = "目录或文件的加解密"
End Sub
Private Sub Command1_Click()
Call SetPathName(False) '解密
End Sub
Private Sub Command2_Click()
Call SetPathName(True) '加密
End Sub
Private Sub SetPathName(SetMi As Boolean)
Dim nName As String, NewName As String, nSort As String, nCap As String, dl As Long
nName = Trim(Text1.Text)
If Right(nName, 3) = "..\" Then nName = Left(nName, Len(nName) - 3)
If Right(nName, 1) = "\" Then nName = Left(nName, Len(nName) - 1)
If SetMi Then
NewName = nName & "..\"
Else
NewName = nName
nName = nName & "..\"
End If
If SetMi Then nCap = "加密" Else nCap = "解密"
nSort = GetShortName(nName) '转变其中的 ..\
If nSort = "" Then
MsgBox "文件没有找到：" & vbCrLf & nName, vbCritical, nCap
Exit Sub
End If
If MoveFileEx(nSort, NewName, 0) = 0 Then Exit Sub '文件更名：非零表示成功，支持只读文件
MsgBox nCap & "成功：" & vbCrLf & nName, vbInformation, nCap
End Sub
Public Function GetShortName(F As String, Optional ShortAll As Boolean) As String
'转变为短文件名，如果目录或文件不存在就返回空。可用于判断某目录或文件是否存在
'不能直接用 API 函数 GetShortPathName， 因它不支持 ..\
'ShortAll=T 表示全部转变为短名称，否则只转变其中的点点杠“..\”
Dim FondID As Long, ID1 As Long, S As Long, nPath As String
Dim nF As String, InfoF As Win32_Find_Data, qF As String, hF As String
Dim nName As String, nName1 As String

nF = F
Do
S = InStr(nF, "..\")
If S = 0 Then Exit Do
qF = Left(nF, S + 2): hF = Mid(nF, S + 3) '分为前后两部分
CutPathName qF, nPath, nName
nName = LCase(nName)
qF = nPath & "\" & "*."
FondID = FindFirstFile(qF, InfoF) '-1表示失败。查找所有文件（夹）
ID1 = FondID
Do
If FondID = Find_Err Or ID1 = 0 Then GoTo Exit1 '没有找到符合条件的条目

nName1 = LCase(CutChr0(InfoF.cNameFile)) '文件（夹）名称
If nName1 & ".\" = nName Then
nName1 = CutChr0(InfoF.cAlternate) '用短文件名代替
If hF = "" Then nF = nPath & "\" & nName1 Else nF = nPath & "\" & nName1 & "\" & hF
Exit Do
End If
ID1 = FindNextFile(FondID, InfoF) '查找下一个，0表示失败
Loop
FindClose FondID
Loop

Exit1:
FindClose FondID

S = MAX_PATH: nName = String(S, vbNullChar)
ID1 = GetShortPathName(nF, nName, S) '返回实际字节数，0表示失败
If ID1 = 0 Then Exit Function

If ShortAll Then
If ID1 > S Then
S = ID1: nName = String(S, vbNullChar)
ID1 = GetShortPathName(nF, nName, S) '返回实际字节数
End If
GetShortName = CutChr0(nName)
Else
GetShortName = nF
End If
End Function
Public Sub CutPathName(ByVal F As String, nPath As String, nName As String)
Dim I As Long, LenS As Long

LenS = Len(F)
For I = LenS - 1 To 2 Step -1
If Mid(F, I, 1) = "\" Then
nPath = Left(F, I - 1): nName = Mid(F, I + 1)
GoTo Exit1
End If
Next
nPath = F: nName = ""

Exit1:

If Right(nPath, 2) = ".." Then
nPath = nPath & "\"
Else
If Right(nPath, 1) = "\" Then nPath = Left(nPath, Len(nPath) - 1)
End If

If Right(nName, 1) = "\" And Right(nName, 3) <> "..\" Then nName = Left(nName, Len(nName) - 1)
End Sub
Private Function CutChr0(xx As String) As String
Dim S As Long
S = InStr(xx, vbNullChar)
If S > 0 Then CutChr0 = Left(xx, S - 1) Else CutChr0 = xx
End Function
'参考资料见下

Ⅵ 我想自己写一个文件夹加密程序，求哪位好心的大神给个源代码，我参考一下，谢谢

这样太麻烦了，我建议您可以下载一个文件夹加密软件试试。

给文件夹加密，我推荐您可以试试文件夹加密超级大师。

1 下载安装文件夹加密超级大师。

2 在需要加密的文件夹上单击右键选择加密，然后在弹出的文件夹加密窗口中输入加密密码就OK。

操作方法相对来说还是比较简便的，我建议您可以下载试用一下。

Ⅶ 如何对php文件进行加密

Zend Guard是目前市面上最成熟的PHP源码加密产品。
经过搜集资料，亲身测试后，总结了如何利用Zend Guard对PHP文件进行加密，以及如何利用Zend Loader对加密后的PHP文件进行解密。

我使用的是Wampserver2.2，其中php的版本是5.3.10。（注意：这个里面自带的php版本属于TS版本，即Thread safety线程安全）

Zend Guard的安装及破解

点击下载 Zend Guard5.5.0，下载完成后，请自行傻瓜式安装。

破解需要注意以下几点：
1、本KEY的有效时间为2010年7月10号，因此激活时，请将自己电脑的系统时间调整到这个时间之前，如：2009-01-01
2、本KEY激活的为试用版，加密过的文件只有14天有效时间，因此在加密文件时，请将自己电脑的系统时间向后调整几年，如：2020-01-01
3、点击下载授权文件 zend_guard授权文件.zip，解压得到zend_guard.zl，即激活用的文件
4、打开Zend Guard 5.5.0，[Help] -> [Register] -> [Search for a license file on my disk]，选择zend_guard.zl授权文件激活即可
如何使用Zend Guard进行加密？
1、打开Zend Guard 5.5.0，[File]->[New]->[Zend Guard Project]，新建项目。
弹出如下的对话框：

2、点击 Next ，下一步。弹出如下对话框，选择要进行加密的源文件或文件夹。
本步骤是选择要加密的文件，可以是单个文件[Add File]或整个文件夹[Add Folder]，然后[Next]。
（此处，我选择的是对整个文件夹进行加密。即 D:wampwwwdemo 里的所有文件进行加密。）

3、接下来是选择PHP的版本[与你web服务器上PHP的版本相对照]，这里很重要，版本不对会出错，[Finish]完成项目的创建。
注意： 对于Zend Guard 5.5.0这个版本的加密软件，最高只可支持5.3版本的PHP。如果您的PHP版本较高，请到Zend Guard官网下载对应的高版本加密软件。
（由于，我的PHP版本是PHP 5.3.10，故这里我选择PHP 5.3，其他地方可以默认，直接点击完成）

4、在Zend Guard左侧的Guard Explorer中，可以看到你新建的项目了，鼠标选中项目名称后，右键单击[Encode Project]，完成。
如此，就实现了对PHP源码的最简单的加密。
我们可以在产品的输出目录（D:proctDir）里，看到加密后的文件。

可以看出，产品输出目录里的PHP文件已被加密了。

这种最简单的加密方式，我们并没有设置加密的有效期，也没有设置许可证支持（即解密时，是否需要许可证文件），默认是永不过期，不需要解密许可文件。
如果要设置解密时的许可证文件，可以点击 项目名称（project_test) ，再点击 项目主窗口中的 Overview 旁边的 Security 选项卡，就可以进行更加安全的加密设置了。 如下图：

Zend Loader 解密

上面我们已经对PHP代码进行了最简单的加密（编码），加密后生成的PHP源代码，就不能再被web服务器上的PHP模块解析了。
当我们将加密后的php文件放到web服务器上执行时，会显示如下信息：

Zend Guard Run-time support missing!
One more more files on this web site were encoded by ZendGuard and the required run-time support is not installed orproperly configured.
......

原来，加密后的php代码需要ZendGuardLoader模块才能正常运行。
因为我的php版本是5.3.10的，所以我这里只提供了ZendGuardLoader-php-5.3-Windows，如果是其他版本的php，请自行网络。
点击下载 ZendGuardLoader-php-5.3-Windows
下载后，解压压缩包，找到目录里的 ZendLoader.dll 文件，将它复制到你的php目录里的ext目录（PHP的扩展库目录）下，再编辑PHP的配置文件php.ini，添加如下代码：

[Zend.loader],
zend_loader.enable=1
zend_loader.disable_licensing=1
zend_loader.obfuscation_level_support=3
zend_loader.license_path=
zend_extension="d:wampinphpphp5.3.10extendLoader.dll"

注：
zend_loader.enable 表示是否启用zend loader，1表示启用，0表示禁用
zend_loader.disable_licensing 表示是否禁用许可证，1表示禁用，0表示不禁用 （由于上面我加密php文件的时候，没有设置许可证支持，故解密时，禁用许可证）
zend_loader.obfuscation_level_support 表示代码混淆级别
zend_loader.license_path 指定许可证文件的路径
zend_extension 指定zend loader 扩展文件 的路径

配置完成后，重启wampserver，如果您的php的版本是NTS（非线程安全的话），就可以正常执行加密后的PHP文件了。
但是，多数情况下的php版本都是TS（线程安全）的，比如，我这个wampserver集成环境中的php是php-5.3.10-ts，它是没有办法支持Zend Guard Loader扩展文件的。故还会报出上面的错误提示信息。
因为，Zend Guard Loader 只能支持 NTS版本的php，终极解决办法是下载安装 NTS 版本的php。

为了实现PHP源文件的 Zend 解密测试，可以下载安装 php-5.3.29-nts-Win32-VC9-x86，再来配置 Zend Loader 扩展支持。

如何查看安装好的PHP的版本及PHP是否已经成功支持Zend Loader？

通过查看 phpinfo() 函数的输出信息，利用 Ctrl + F 快速查找关键字Thread Safety 和 Zend Guard Loader。
如本人安装好php-5.3.29-nts版本的php后，phpinfo()的输出信息如下：

可以看到，Thread Safety 对应的值为disabled，就说明该php的版本是 NTS （非线程安全）的，否则就是TS版本的。
输出信息中，还可以看到 Zend Guard Loader v3.3 字样，说明 Zend Guard Loader 也安装成功了。
再往下面看，还可以查看 Zend Guard Loader 的配置信息，如下：

到此，整个 Zend Guard 加密和 Zend Guard Loader 解密，就介绍完毕了。

温馨提示： 为了顺利实现PHP代码的zend加密和解密，建议使用PHP官网上主流的PHP的NTS版和Zend官网上对应的Zend Guard加密软件、 Zend Guard Loader解密插件。

相关附件：
Wampserver2.2
Zend
Guard5.5.0
php-5.3.29-nts-Win32-VC9-x86
mod_fcgid-2.3.6-win32-x86.zip

Ⅷ 怎样给文件夹加密

1、在想要加密的位置创建一个新的文件夹，比如在D磁盘下面创建一个123文件夹(名称不重要)。

2、下载加密文件(批处理文件)并将其复制到文件夹123。

3、在解压柜后右键单击文件下载。bat，选择“编辑”(不打开)，找到“修改你的密码”这一行，删除单词，设置自己的密码，123456，例如，一行代码将会成为if NOT pass % % = = 123456 goto不保存文件。

4、双击储物柜。Bat，然后在123将显示文件夹下的Privatede文件夹，文件夹是一个加密文件夹，你可以把你想要隐藏的文件放在这里。

再次双击储物柜。Bat并询问是否确定要锁定该文件夹并输入Y以按enter。然后，私有文件夹消失。如果你想打开这个文件夹，双击储物柜。Bat，输入您刚刚设置的密码(123456)来显示文件夹。

Ⅸ 源代码加密哪个软件好

• 源代码加密软件推荐使用赛虎信息科技的绿盾加密软件，是一套从源头上保障数据安全和使用安全的软件系统。采用的是文件透明加密模块，对平常办公使用是没有影响的。而且绿盾支持与SVN等源代码管理工具无缝结合。

• 如果企业内部SVN服务器采取透明模式，即加密文件是可以存放在SVN服务器上的，需要达到的效果是SVN服务器上文件密文存储。则配合天锐绿盾应用服务器安全接入系统来实现只有安装了加密客户端的Windows、Linux、MAC端才能够正常的访问公司内部的SVN服务器。

• 如果企业内部采用eclipse、VS等开发工具，从这些开发工具将代码直接上传到SVN服务器上时会自动解密。为了避免明文、密文混乱存放导致版本比对时出现错误等问题。因此，SVN服务器上需统一存放明文文件。则通过服务器白名单功能实现对终端电脑数据进行强制透明加密，对上传到应用服务器数据实现上传自动解密、下载自动加密。再配合天锐绿盾应用服务器安全接入系统实现只有安装了加密客户端的Windows、Linux、MAC端才能够正常的访问公司内部的SVN服务器。

• 赛虎信息科技为客户提供优质的内网安全管理产品和适合多种行业的应用解决方案。