超鏈接加密

A. word超鏈接可以加密嗎

①利用Excel快捷鍵 Ctrl + A 全選所以的單元格，然後，右鍵選擇「設置單元格格式」；
②在彈出的「單元格格式」中選擇「保護」，取消「鎖定」前面的鉤去掉；

③選中所想要鎖定的單個或多個單元格，再次右鍵選擇「設置單元格格式」；
④同樣，在彈出的「單元格格式」窗口中選擇「保護」，再將「鎖定」前面的鉤打上，確定；
⑤繼續選中需要鎖定的單元格，然後單擊菜單欄的「工具」-->保護-->保護工作表，在彈出的「保護工作表」窗口中我們輸入鎖定該單元格的密碼，即可；

B. 用Excel做的超鏈接怎樣加密

點另存為點工具點常規選項，裡面就有設定打開密碼和修改密碼，希望對你有所幫助！

C. 如何在PPT中插入超鏈接

1、選擇需要使用超鏈接的內容或者圖片，右鍵，選擇「超鏈接」

D. 如何在超鏈接中加入網站賬戶密碼信息以可以免密碼直接登錄，而且別人也可以免密碼登陸，像圖片中的

你好，以前的sid網站就可以，比如asp網頁後面有串sid加密字元。把網址和他復制起來，然後加入超鏈接就可以直接使用此帳號登錄了。
但現在網頁都是php，甚至有些都是偽靜態的。安全措施很強，根本做不到這點！希望可以幫到你。

E. excel中附件如何加密（整個EXCEL表不加密，只對其中超鏈接的附件進行加密）

先對附件用rar壓縮，壓縮時設置密碼，然後鏈接rar。如果附件是excel，那麼就直接對這個設置密碼即可，然後鏈接。

F. 如何在超鏈接中加入網站賬戶密碼信息以直接登錄

這個是post提交，得看你具體啥網站，有的網站會進行加密截取，或者用時間戳，還有的加干擾符等等，不是簡單的直接放進去就可以了，還有啥不會的可以找額

G. 我的url裡面需要傳遞一個參數比如<a href="a.jspkk=<%=name%>" 怎麼加密

加密JS：---------------------------------------------------------------------

function encrypt(str, pwd)
{
//判斷密鑰是否為空
if(pwd == null || pwd.length <= 0)
{
alert("請輸入密鑰");
return null;
}

//得到密鑰的字元串的Unicode碼
var prand = "";
for(var i=0; i<pwd.length; i++)
{
prand += pwd.charCodeAt(i).toString();
//alert(prand);
}

var sPos = Math.floor(prand.length / 5);//返回小於等於其數值參數的最大整數
var mult = parseInt(prand.charAt(sPos) + prand.charAt(sPos*2) + prand.charAt(sPos*3) + prand.charAt(sPos*4) + prand.charAt(sPos*5));//返回從字元串轉換得到的整數. (charAt返回 String 對象的指定索引處的字元。)
var incr = Math.ceil(pwd.length / 2);//返回數的上限
var mo = Math.pow(2, 31) - 1;//返回基數表達式的指定次冪的值
if(mult < 2)
{
alert("您輸入的密鑰過於簡單或者是長度太短");
return null;
}

var salt = Math.round(Math.random() * 1000000000) % 100000000; //Math.round是四捨五入函數。 Math.random是返回一個偽隨機數（0到1之間的double型數）
prand += salt;

while(prand.length > 10)
{
prand = (parseInt(prand.substring(0, 10)) + parseInt(prand.substring(10, prand.length))).toString();
}

prand = (mult * prand + incr) % mo;
var enc_chr = "";
var enc_str = "";

for(var i=0; i<str.length; i++)
{
enc_chr = parseInt(str.charCodeAt(i) ^ Math.floor((prand / mo) * 255));

if(enc_chr < 16)
{
enc_str += "0" + enc_chr.toString(16);
}
else
enc_str += enc_chr.toString(16);

prand = (mult * prand + incr) % mo;
}

salt = salt.toString(16);

while(salt.length < 8)salt = "0" + salt;
enc_str += salt;

return enc_str;
}

解密JS：---------------------------------------------------------------------

function decrypt(str, pwd,stu)
{
if(str == null || str.length < 8)
{
alert("您輸入的內容過短，請重新輸入");
return;
}
if(pwd == null || pwd.length <= 0)
{
alert("請輸入密鑰");
return;
}
var prand = "";

for(var i=0; i<pwd.length; i++)
{
prand += pwd.charCodeAt(i).toString();
}

var sPos = Math.floor(prand.length / 5);
var mult = parseInt(prand.charAt(sPos) + prand.charAt(sPos*2) + prand.charAt(sPos*3) + prand.charAt(sPos*4) + prand.charAt(sPos*5));
var incr = Math.round(pwd.length / 2);
var mo = Math.pow(2, 31) - 1;
var salt = parseInt(str.substring(str.length - 8, str.length), 16);
str = str.substring(0, str.length - 8);
prand += salt;

while(prand.length > 10)
{
prand = (parseInt(prand.substring(0, 10)) + parseInt(prand.substring(10, prand.length))).toString();
}

prand = (mult * prand + incr) % mo;
var enc_chr = "";
var enc_str = "";

for(var i=0; i<str.length; i+=2)
{
enc_chr = parseInt(parseInt(str.substring(i, i+2), 16) ^ Math.floor((prand / mo) * 255));
//alert(enc_chr);
enc_str += String.fromCharCode(enc_chr);
//alert(enc_str);
prand = (mult * prand + incr) % mo;
}

return enc_str;
}

encrypt：加密方法。
str:你需要加密的字元串，pwd 密匙 返回的是一串加密的密文。
decrypt：解密方法。使用密匙+密文，得到原來解密的值

H. 給excel加密會影響超鏈接嗎

不會的。原因如下：
1、超鏈接在表加鎖時也能打開。
2、保護了工作表不影響隱藏操作，只有保護了工作薄才影響。
3、如果隱了行列，再保護進來，則你就要解開保護才能取消隱藏。

I. 電腦文件夾的超鏈接（電腦高手請進）

WINXP支持下面的文件夾重定向,方法:

單擊「開始」--「運行」--輸入「regedit」--「確定」就打開了注冊表，然後定位到這個了項 「HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders」

在右窗口就可以看到「Desktop」了，雙擊它就打開了一個「編輯字元串」對話框，可以看到「數值數據」輸入框中一般是「%USERPROFILE%\桌面」，將「%USERPROFILE%\桌面」改為你想要的文件夾，比如「D:\桌面」即可！

在這個位置你還可以更改其他用戶文件的路徑
AppData 應用程序數據目錄 C:\Documents and Settings\User name\Application Data
Cookies Cookies路徑 C:\Documents and Settings\User name\Cookies
Desktop 桌面路徑 C:\Documents and Settings\User name\桌面
Favorites 收藏夾 C:\Documents and Settings\User name\Favorites
NetHood NetHood路徑 C:\Documents and Settings\User name\NetHood
Personal 我的文檔 C:\Documents and Settings\User name\My Documents
PrintHood 列印 C:\Documents and Settings\User name\PrintHood
Recent 文檔項路徑 C:\Documents and Settings\User name\Recent
SendTo SendTo路徑 C:\Documents and Settings\User name\SendTo
Start Menu 開始菜單路徑 C:\Documents and Settings\User name\「開始」菜單
Templates 新建文件目錄 C:\Documents and Settings\User name\Templates
Programs 程序菜單路徑 C:\Documents and Settings\User name\「開始」菜單\程序
Startup 啟動路徑 C:\Documents and Settings\User name\「開始」菜單\程序\啟動
History 網頁歷史記錄 C:\Documents and Settings\ User name \Local Settings\History
My Pictures 圖片收藏 C:\Documents and Settings\User name\My Documents\My Pictures
My Music 我的音樂 C:\Documents and Settings\User name\My Documents\My Music
My Video 我的視頻 C:\Documents and Settings\User name\My Documents\My Videos
Cache Internet臨時文件夾 C:\ Documents and Settings\User name \Temporary Internet Files

參考:
http://social.microsoft.com/forums/zh-CN/windowsxpzhchs/thread/539572a7-168a-4b2c-8a0b-3c20942694a3/

J. EXCEL工作表中超鏈接加密，但工作表不加密，求大俠解答

這個稍微簡單點，只要在跳轉錢加入inputbox判斷就可以了！
Sub test()
st:
a = Application.InputBox("請輸入密碼：", "密碼", , , , , , 1)
If a = "False" Or Trim(a) = 0 Or Trim(a) = "" Then End
If a = 1234 Then
Application.Goto Sheets(2).Range("a1")
Else
MsgBox "密碼錯誤,請重新輸入": GoTo st
End If
End Sub