本文目录一览:
给QQ空间里“新建版块”里插入东西的代码!
天气预报代码:
iframe name="I1" src="" width="250" height="240"
/iframe
Flash代码:(FLASH地址要以.swf结尾)
/textareaembed src=’’http://你的Flash地址’’quality=high pluginspage=’’’’ type=’’application/x-shockwave-flash’’ width=330 height=240/embed
透明FLASH:
/textareaembed src=http://你的Flash特效地址 wmode=transparent style="position: absolute" width=380 height=270
注:width=和height=后面的数字是填FLASH大小高矮度..
背景音乐代码:
/textareaembed src=http://你的背景音乐地址 width=0 height=0 loop= true (此代码不显播放器)
/textareaembed src=http://你的背景音乐地址 width=2 height=2 loop= true (此代码显播放器)
1.如何得到音乐地址...
首先打开百度音乐搜索
输入歌名..格式(只能是MP3和WMA)→查找
找到歌曲..点试听..
注意:要能听见的..而且听起来不卡的....!!!!(重要)
试听里边有个播放器..播放器右上方有个地址..
右键点击地址...→复制快捷方式
进入音乐盒..点添加
把歌曲地址复制到这里..
添加好以后要在歌曲后边的绿色加号上打勾才能自动播放..!(重要)
视频MTV代码:(地址要以.rm/.wmv/.asf/.avi/.mpg结尾)
(播放器的大小可以自己调整代码中的数值,只需改height =“高度”,width =“宽度”)
以.wmv或者.asf结尾:
/textareaembed src=http://你的视频文件地址 width=360 height=280 loop= true
以.rm结尾:
/textareaembed src=http://你的视频文件地址 type=audio/x-pn-realaudio-plugin console=clip1 controls=ImageWindow height=124 width=180 autostart=true loop=true
以.avi或者.mpg结尾:
/textareaembed src="音乐源地址" border="0" width="320" height="240" type="application/x-mplayer2"/embed
小技巧,想要当你的好友一登陆你的空间就能马上听到最新的音乐视听吗? 技巧在于代码结尾加上wid, 如下
/textareaembed src=http://你的音乐地址 width=360 height=280 wid
电台代码:(地址要以.asp结尾的地址)
/textareaembed src= http://你的电台地址 type=audio/x-pn-realaudio-plugin console=clip1 controls=ImageWindow height=124 width=180 autostart=true loop=truebr
代码
相关作用
b加粗/b
使文字加粗
i斜体/i
使文字倾斜
u加下划线/u
给文字加下划线
s加删除线/s
给文字加删除线
pre预设格式
令文件按照原始的排版方式显示
*好用,省去了频繁插入br与p的烦恼
艺术字代码:
发光文字代码
/textareatable style="FILTER: glow(color=#6699FF,direction=2)"
font color=#ffffff size=2要修改的文字/font
/table
其中color是阴影的颜色,可以配合网页色调改变,direction是设置阴影的强度,font color是原字体的颜色。
浮雕的文字
/textareatable style="FILTER: dropshadow(color=#6699FF, offx=1, offy=1, positive=1);"
font color=#ffffff要修改的文字/font
/table
其中color是阴影的颜色,可以配合网页色调改变,positive是设置阴影的强度,offx和offy是设置的阴影和文字的距离,font color是原字体的颜色。
阴影的文字
/textareatable style="FILTER: dropshadow(color=#cccccc, offx=2, offy=2, positive=2);"
font color=#6CABE7 size=2要修改的文字/font
/table
文本框字体
/textareaTEXTAREA STYLE="font:12px;font-family:Verdana;color:#666666"输入内容
注:字体(font-family)还可以选用Arial,Tahoma等等;color可自行设定
tr 表格列 border="5"边框宽度为5像素,bordercolor="Purple"边框颜色为紫色
td 表格栏 bgcolor="Green"表格背景颜色为绿色
插入超链接 (请注意:如果该链接为恶意链接的话,腾讯会自动屏蔽,请大家不要乱用)
文字链接代码 /textarea点击a href=’’http://你要链接的地址’’ target=’’_blank’’文字说明/a
图片链接代码 /textareaa href="你要链接的地址" title="文字说明",_blank
设为首页/加入收藏代码:
a target=_top href=javascript:window.external.AddFavorite('')〖加入收藏〗/a..a href=# onClick="this.style.behavior='url(#default#homepage)';this.setHomePage('');"【设为首页】/a
在主页加入钟表的代码!
embed src='时钟的连接地址'quality=high pluginspage='' type='application/x-shockwave-flash' width=100(宽) height=100(高)/embed
其中宽和高是 FLASH显示出来的宽度和高度
把以上代码放在新建版快的评论栏中,图片地址和连接地址清空,什么都不要留!
保存就可以显示一个漂亮的时钟!
一直到
........................./Clock129.swf
图片上下移动代码:
图片从下往上移动的友情连接代码。效果可以在我主页看到
新建立一个模块,然后将下面的代码加入评论中!
你只需要修改代码中,中文部分,连接地址=你朋友的地址
图片地址=你朋友的LOGO图片地址
marquee behavior="scroll" direction=up width="120" height="60" scrollamount="1" scrolldelay="60" onmouseover="this.stop()" onmouseout="this.start()"a target="cont" href="连接地址"img src="http://图片地址" width="88" height="33" border="0"/a/marquee
这是一个移动的,如果你要多个的话就这样
marquee behavior="scroll" direction=up width="120" height="60" scrollamount="1" scrolldelay="60" onmouseover="this.stop()" onmouseout="this.start()"a target="cont" href="连接地址"img src="http://图片地址" width="88" height="33" border="0"/aa target="cont" href="连接地址"img src="图片地址" width="88" height="33" border="0"/a/marquee
对比就看出来了,下面多出段
a target="cont" href="连接地址"img src="图片地址" width="88" height="33" border="0"/a
就这样,你每多一个连接你就多插进去一段!
百度搜索条代码:
iframe id="baiduframe" border="0" vspace="0" hspace="0" marginwidth="0" marginheight="0"
framespacing="0" frameborder="0" scrolling="no" width="700" height="50"
src=";csid=1rkcs=0bgcr=E2EEFCftcr=003366wd=700ht=50tbsz=12sropls=1,4,6,2,3kwnm=18kwgp=1rk=1bd=1bdas=1tbst=1sropst=1"
/iframe
滚动字:
这是代码:
marquee border="0" align="middle" scrolldelay="120"想说的字/marquee
其它代码:
屏蔽右键代码 /textareabody oncontextmenu="return false" (这条代码可以防止日记源代码轻易被盗取,推荐使用)
网页无法另存代码 /textareanoscriptiframe src=*/iframe/noscript
网页透明代码 /textareabody background-color:transparent
其他html代码
默林魔法老人代码:
body
SCRIPT
function crml(nid)
try
nid=new ActiveXObject("Agent.Control.2");
nid.Connected = true;
nid.Characters.Load("");
return nid;
catch (err)
return false;
function chplay ()
if (ml=crml ("ml"))
var MerlinID;
var MerlinACS;
Merlin = ml.Characters.Character(MerlinID);
Merlin.MoveTo(200,200);
Merlin.Show();
Merlin.Play("Explain");
Merlin.Play("Announce");
Merlin.Speak("修改成您的语言");
Merlin.Play("Gestureright");
Merlin.Play("Pleased");
Merlin.Speak("修改成您的语言");
Merlin.Play("Idle1_1");
Merlin.Hide();
Merlin.MoveTo(600,300);
Merlin.Show();
Merlin.Play("Surprised");
Merlin.Speak("修改成您的语言");
Merlin.Play("Read");
Merlin.Speak("修改成您的语言");
Merlin.Play("Read")
Merlin.Play("GestureUp");
Merlin.Speak("修改成您的语言");
Merlin.Play("DontRecognize");
Merlin.Speak("修改成您的语言");
Merlin.Play("DontRecognize");
Merlin.Play("Greet");
Merlin.Speak("修改成您的语言");
Merlin.Play("Greet");
Merlin.Speak("修改成您的语言");
Merlin.Play("Greet");
Merlin.Hide();
/SCRIPT
SCRIPT
chplay()
/SCRIPT
/body
使用方法:
1.新建一个TXT文档.
2.将代码保存.
3.将TXT文档上存到网上(我本来找到一个网站可以上传的.但是现在封了,如果黑客动画吧可以提供一个老人代码的地址给我没用就好咯!~顺便在代码中做个小小宣传!!我的建议希望动画吧使用咯!)
4.得到TXT文档地址.
iframe id="main" name="I8" frameBorder="0" width="0" scrolling="no" height="0" src="默林文本的连接地址"/iframe
用小号空间克隆自己的Q-ZONE提高人气的办法!(这个我试过.但验证不出是真是假.)
大家是不是都想自己的花快快长大,天天踩啊踩啊真的好累啊!
但是自己的Q-ZONE只有一个网络地址,就象我的是一样,怎么解决这个问题呢!
忽忽,昨天我在无意中发现了这个办法,我们可以用自己的号去开通小号的空间,然后用小号的空间克隆大号的空间(镜象),这样你的Q-ZONE不是又多了一个网络地址吗,忽忽,2个号拉起票来给一个号灌溉应该快点吧,要是你小号多的话不防克隆他10个8个的,忽忽!
克隆自己空间办法如下:
开通自己小号空间,新建立一个版块,在评论中插如以下代码:
iframe id="main" name="I8" frameBorder="0" width="0" scrolling="no" height="0" src="313715638.q-zone.qq.com"/iframe
代 码
相关作用
br
换行
p一段文字/p
段落
bgcolor="#00FF00"
背景颜色(#00FF00为绿色)
-2N
text="#0000FF" -x.
字体颜色(#0000FF为蓝色)
-zz
p align="left"文字/p
文字左对齐
p align="center"文字/p
文字居中
p align="right"文字/p
文字右对齐
播放音乐代码中的参数介绍
Autostart
是否在音乐下载完之后就自动播放。true 是,false 否
loop
是否自动反复播放。LOOP=2 表示重复两次,true 是,false 否
hidden
是否完全隐藏控制画面,true 为是,false 为否
STARTTIME="分:秒"
设定歌曲开始播放的时间。如 STARTTIME="00:30" 表示从第30秒处开始播放
WIDTH="整数" 和 HIGH="整数"
设定控制面板的高度和宽度。(若 HIDDEN="false")
ALIGN="center"
设定控制面板和旁边文字的对齐方式,其值可以是 top、bottom、center、baseline、 left、right、texttop、middle、absmiddle、
absbottomCONTROLS="smallconsole"
设定控制面板的外观。预设值是 console。
console 一般正常面板 smallconsole 较小的面板 playbutton
只显示播放按钮 pausecutton 只显示暂停按钮 stopbutton 只显示停止按钮 volumelever 只显示音量调节按钮
提示
关于QQ空间的一切代码写入日记内容区及标题栏都必须带上标记/textarea方能生效
任何标记皆由""及""所围住,如 P
标记名与小于号之间不能留有空白字符
参数只可加于起始标记中
在起始标记之标记名前加上符号"/"便是其终结标记,如 /font
标记均成对出现,除了换行符br单独使用以外
标记字母大小写皆可
黑客动画吧记事本源代码
VB.net编程方法:
'新建文件
Private Sub mnuNew_Click()
RichTextBox1.Text = "" '清空文本框
FileName = "未命名"
Me.Caption = FileName
End Sub
'打开文件
Private Sub mnuOpen_Click()
CommonDialog1.Filter="文本文档(*.txt) *.txt RTF文档(*.rtf) *.rtf 所有文件(*.*) *.*"
CommonDialog1.ShowOpen
RichTextBox1.Text = "" '清空文本框
FileName = CommonDialog1.FileName
RichTextBox1.LoadFile FileName
Me.Caption = "超级记事本:" FileName
End Sub
'保存文件
Private Sub mnuSave_Click()
CommonDialog1.Filter="文本文档(*.txt) *.txt RTF文档(*.rtf) *.rtf 所有文件(*.*) *.*"
CommonDialog1.ShowSave
FileType = CommonDialog1.FileTitle
FiType = LCase(center(FileType, 3))
FileName = CommonDialog1.FileName
Select Case FiType
Case "txt"
RichTextBox1.SaveFile FileName, rtfText
Case "rtf"
RichTextBox1.SaveFile FileName, rtfRTF
Case "*.*"
RichTextBox1.SaveFile FileName
End Select
Me.Caption = "超级记事本:" FileName
End Sub
'退出
Private Sub mnuExit_Click()
End
End Sub
'复制
Private Sub mnuCopy_Click()
Clipboard.Clear
Clipboard.SetText RichTextBox1.SelText
End Sub
'剪切
Private Sub mnuCut_Click()
Clipboard.Clear
Clipboard.SetText RichTextBox1.SelText
RichTextBox1.SelText = ""
End Sub
'全选
Private Sub mnuSelectAll_Click()
RichTextBox1.SelStart = 0
RichTextBox1.SelLength = Len(RichTextBox1.Text)
End Sub
'粘贴
Private Sub mnuPaste_Click()
RichTextBox1.SelText = Clipboard.GetText
End Sub
'查找
Private Sub mnuFind_Click()
sFind = InputBox("请输入要查找的字、词:", "查找内容", sFind)
RichTextBox1.Find sFind
End Sub
'继续查找
Private Sub mnuFindOn_Click()
RichTextBox1.SelStart = RichTextBox1.SelStart+RichTextBox1.SelLength + 1
RichTextBox1.Find sFind, , Len(RichTextBox1)
End Sub
'使用说明
Private Sub mnuReadme_Click()
On Error GoTo handler
RichTextBox1.LoadFile "Readme.txt",rtfText'请写好Readme.txt文件并存入程序所在文件夹中
Me.Caption = "超级记事本:" "使用说明"
Exit Sub
handler:
MsgBox "使用说明文档可能已经被移除,请与作者联系。", vbOKOnly, " 错误信息"
End Sub
VC++编程方法:
首先用VC++创建一个MFC AppWizard(exe)单文档工程,名字Notepad。在Advanced里面File extension(文件扩展名)里面写txt就是关联txt文件,在Base class里面要选CEditView类(意思是基于这个类派生出你用的类)
其实这样生成的就是一个记事本了,但是和原来的记事本还是有区别的
所以我们还要添加点功能,这样才能起到让新人了解VC++的目的
1、我们先加一个设置字体
在 CNotepadView类里面定义字体(就是public) CFont m_Font;
定义消息处理函数:
void CNotepadView::OnFormatFont()
// TODO: Add your command handler code here
LOGFONT lf;
CFont *font=this-GetEditCtrl().GetFont();
if(font==NULL)
font =new CFont;
font-CreatePointFont(120,"Fixedsys");
font-GetLogFont(lf);
delete font;
else
font-GetLogFont(lf);
CFontDialog cf(lf);
if(cf.DoModal()==IDOK)
this-m_Font.DeleteObject();
this-m_Font.CreateFontIndirect(lf);
this-SetFont(this-m_Font);
2、设置字体
在 CNotepadView类里面定义 BOOL bChk;
消息处理函数
void CNotepadView::OnFormatReturn()
// TODO: Add your command handler code here
bChk=!bChk;
if(!bChk)
ShowScrollBar(SB_HORZ,true);
else
ShowScrollBar(SB_HORZ,false);
下面是源代码RAR压缩包
黑客动画吧记事本源代码不会轻易公开的,那个记事本也不太好,界面也不好,其实破解也很容易的,但是意义不大。
网页编程
script
window.setInterval("pop()",600000)
function pop(){
alert("弹出窗口");
//不用循环,函数setInterval(参数1,参数2)间隔参数2的时间执行参数1函数
/script
黑客动画吧 壁纸
这是我当黑客以来接到的一项最具挑战性的生意,是去黑另一个黑客的电脑。工欲善其事,必先利其器,我很明白现今装备的重要性,于是我把自己从头武装到脚,包装上了全黑的紧身夜行衣和戴上墨镜。
一出门,我就给车撞了……司机下车后,打着强光手电筒找了好半天才找到躺在地上的我,说了一句:原来木乃伊也有黑色的。
赔了钱,我才起来继续前行。
很快我就到了目的地。任务是窃取那人的上网密码。对于一个娴熟的黑客高手来说,不消片刻我就能将随身所带的手提电脑打开,接上无线上网卡,打开要用的程序了。接着就是怎样窃取了。方法是我趴在他窗前,密切注视他的举动,等他在键盘上打密码时迅速记下来,然后用手提电脑已打开的记事本写上,再立即通过无线上网传真到家里的传真机上保存下来。
很可惜那小子在我来之前已经输过密码了,害我趴了大约两小时他都没有再输一次的举动,所以我惟有决定让他死机了。让他死机简直是易如反掌,具体操作就是用一块红砖扔他的电脑,肯定死的。我找了很久用了将近两小时才在一个很远的地方找到,副作用是太远我不会回到原来的地方了。终于辛苦问路后才回到目的地,可惜又把红砖忘了拿。
做一个黑客真的不能懒,要黑人家机子就必须循正途好好地认真地黑,于是我决定剪他家门外的电线,让他没电死机。当他隔壁邻居的一整片屋子都断电漆黑一片时,我触电晕过去了。
约莫一小时后,因为手机有来电才把我弄醒的。
作为一个黑客,手机当然不能有铃响声,但我又是如何得知有来电而被弄醒的呢?这里有个窍门,是经过我历时半年反复实验解决的,用简单些的话说就是将手机调为振动。
电话是客户打来的,他很歉疚地说,想将任务更改一下,就是不要破坏他的电脑,只将病毒种在他电脑上就行了,猜到现在快天亮了,想必我已将他的电脑破坏得不堪入目,希望我能把它修复过来,再种病毒,让他不知不觉。酬劳愿意给我双倍。我说没问题,请相信我,保证马上就可把他的电脑修复成像未被破坏过一样,等我好消息。
我在附近偷了人家晾衣服的竹竿,再把衣架做成一个抓钩绑在竹竿上,趁他上厕所的时候把他的手提电脑从窗户给钩了出来,再把我自己的电脑给换回去,然后就溜了。
我自己的手提电脑早就中了冰河木马蠕虫一大堆,这次他死定了