简单好玩的编程代码简单（简单实用的编程代码）

1.获得系统时间:

<%=now()%>

2.取得来访用的IP:
<%=request.serverVariables("remote_host")%>

3.获得系统,浏览器版本:

4.去除IE滚动条:

5.进入网站,跳出广告:

6.随机数:
<%randomize%>

<%=(int(rnd()*n)+1)%>

N为可改变数

7.向上混动代码:

height="207" bgcolor="#FFFF00">hhhhhhhhhhhhhhhhhhh

8.自动关闭网页:

本页10秒后自动关闭,请注意刷新页面

9.随机背景音乐:

<%randomize%>

可以修改数字，限制调用个数，我这里是６０个．

10.自动刷新本页面:

11.ACCESS数据库连接:
<%

option explicit

dim startime,endtime,conn,connstr,db

startime=timer()

'更改数据库名字

db="data/dvBBS5.mdb"

Set conn = Server.CreateObject("ADODB.Connection")

connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)

'如果你的服务器采用较老版本Access驱动，请用下面连接方法

'connstr="driver={ Microsoft Access Driver (*.mdb) };dbq=" & Server.MapPath(db)

conn.Open connstr

function CloseDatabase

Conn.close

Set conn = Nothing

End Function

12.SQL数据库连接:
<%

option explicit

dim startime,endtime,conn,connstr,db

startime=timer()

connstr="driver={ SQL Server };server=HUDENQ-N11T33NB;uid=sa;pwd=xsfeihu;database=dvbbs"

Set conn = Server.CreateObject("ADODB.Connection")

conn.Open connstr

function CloseDatabase

Conn.close

Set conn = Nothing

End Function

13.用键盘打开网页代码:

这里是Ctrl+Enter和Alt+S的代码自己查下键盘的ASCII码再换就行

14.让层不被控件复盖代码:

＃前面

＃后面

bgcolor="#ff0000">

width=100%>

15.动网FLASH广告代码:

16.VBS弹出窗口小代码:

16.使用FSO修改文件特定内容的函数
function FSOchange(filename,Target,String)

Dim objFSO,objCountFile,FiletempData

Set objFSO = Server.CreateObject("Scripting.FileSystemObject")

Set objCountFile = objFSO.OpenTextFile(Server.MapPath(filename),1,True)

FiletempData = objCountFile.ReadAll

objCountFile.Close

FiletempData=Replace(FiletempData,Target,String)

Set objCountFile=objFSO.CreateTextFile(Server.MapPath(filename),True)

objCountFile.Write FiletempData

objCountFile.Close

Set objCountFile=Nothing

Set objFSO = Nothing

End Function

17.使用FSO读取文件内容的函数
function FSOFileRead(filename)

Dim objFSO,objCountFile,FiletempData

Set objFSO = Server.CreateObject("Scripting.FileSystemObject")

Set objCountFile = objFSO.OpenTextFile(Server.MapPath(filename),1,True)

FSOFileRead = objCountFile.ReadAll

objCountFile.Close

Set objCountFile=Nothing

Set objFSO = Nothing

End Function

18.使用FSO读取文件某一行的函数
function FSOlinedit(filename,lineNum)

if linenum < 1 then exit function

dim fso,f,temparray,tempcnt

set fso = server.CreateObject("scripting.filesystemobject")

if not fso.fileExists(server.mappath(filename)) then exit function

set f = fso.opentextfile(server.mappath(filename),1)

if not f.AtEndofStream then

tempcnt = f.readall

f.close

set f = nothing

temparray = split(tempcnt,chr(13)&chr(10))

if lineNum>ubound(temparray)+1 then

exit function

else

FSOlinedit = temparray(lineNum-1)

end if

end function

19.使用FSO写文件某一行的函数
function FSOlinewrite(filename,lineNum,Linecontent)

if linenum < 1 then exit function

dim fso,f,temparray,tempCnt

set fso = server.CreateObject("scripting.filesystemobject")

if not fso.fileExists(server.mappath(filename)) then exit function

set f = fso.opentextfile(server.mappath(filename),1)

if not f.AtEndofStream then

tempcnt = f.readall

f.close

temparray = split(tempcnt,chr(13)&chr(10))

if lineNum>ubound(temparray)+1 then

exit function

else

temparray(lineNum-1) = lineContent

end if

tempcnt = join(temparray,chr(13)&chr(10))

set f = fso.createtextfile(server.mappath(filename),true)

f.write tempcnt

end if

f.close

set f = nothing

end function

20.使用FSO添加文件新行的函数
function FSOappline(filename,Linecontent)

dim fso,f

set fso = server.CreateObject("scripting.filesystemobject")

if not fso.fileExists(server.mappath(filename)) then exit function

set f = fso.opentextfile(server.mappath(filename),8,1)

f.write chr(13)&chr(10)&Linecontent

f.close

set f = nothing

end function

下面是更详细的ContentType
'ez' => 'application/andrew-inset',
'hqx' => 'application/mac-binhex40',
'cpt' => 'application/mac-compactpro',
'doc' => 'application/msword',
'bin' => 'application/octet-stream',
'dms' => 'application/octet-stream',
'lha' => 'application/octet-stream',
'lzh' => 'application/octet-stream',
'exe' => 'application/octet-stream',
'class' => 'application/octet-stream',
'so' => 'application/octet-stream',
'dll' => 'application/octet-stream',
'oda' => 'application/oda',
'pdf' => 'application/pdf',
'ai' => 'application/postscript',
'eps' => 'application/postscript',
'ps' => 'application/postscript',
'smi' => 'application/smil',
'smil' => 'application/smil',
'mif' => 'application/vnd.mif',
'xls' => 'application/vnd.ms-excel',
'ppt' => 'application/vnd.ms-powerpoint',
'wbxml' => 'application/vnd.wap.wbxml',
'wmlc' => 'application/vnd.wap.wmlc',
'wmlsc' => 'application/vnd.wap.wmlscriptc',
'bcpio' => 'application/x-bcpio',
'vcd' => 'application/x-cdlink',
'pgn' => 'application/x-chess-pgn',
'cpio' => 'application/x-cpio',
'csh' => 'application/x-csh',
'dcr' => 'application/x-director',
'dir' => 'application/x-director',
'dxr' => 'application/x-director',
'dvi' => 'application/x-dvi',
'spl' => 'application/x-futuresplash',
'gtar' => 'application/x-gtar',
'hdf' => 'application/x-hdf',
'js' => 'application/x-javascript',
'skp' => 'application/x-koan',
'skd' => 'application/x-koan',
'skt' => 'application/x-koan',
'skm' => 'application/x-koan',
'latex' => 'application/x-latex',
'nc' => 'application/x-netcdf',
'cdf' => 'application/x-netcdf',
'sh' => 'application/x-sh',
'shar' => 'application/x-shar',
'swf' => 'application/x-shockwave-flash',
'sit' => 'application/x-stuffit',
'sv4cpio' => 'application/x-sv4cpio',
'sv4crc' => 'application/x-sv4crc',
'tar' => 'application/x-tar',
'tcl' => 'application/x-tcl',
'tex' => 'application/x-tex',
'texinfo' => 'application/x-texinfo',
'texi' => 'application/x-texinfo',
't' => 'application/x-troff',
'tr' => 'application/x-troff',
'roff' => 'application/x-troff',
'man' => 'application/x-troff-man',
'me' => 'application/x-troff-me',
'ms' => 'application/x-troff-ms',
'ustar' => 'application/x-ustar',
'src' => 'application/x-wais-source',
'xhtml' => 'application/xhtml+xml',
'xht' => 'application/xhtml+xml',
'zip' => 'application/zip',
'au' => 'audio/basic',
'snd' => 'audio/basic',
'mid' => 'audio/midi',
'midi' => 'audio/midi',
'kar' => 'audio/midi',
'mpga' => 'audio/mpeg',
'mp2' => 'audio/mpeg',
'mp3' => 'audio/mpeg',
'aif' => 'audio/x-aiff',
'aiff' => 'audio/x-aiff',
'aifc' => 'audio/x-aiff',
'm3u' => 'audio/x-mpegurl',
'ram' => 'audio/x-pn-realaudio',
'rm' => 'audio/x-pn-realaudio',
'rpm' => 'audio/x-pn-realaudio-plugin',
'ra' => 'audio/x-realaudio',
'wav' => 'audio/x-wav',
'pdb' => 'chemical/x-pdb',
'xyz' => 'chemical/x-xyz',
'bmp' => 'image/bmp',
'gif' => 'image/gif',
'ief' => 'image/ief',
'jpeg' => 'image/jpeg',
'jpg' => 'image/jpeg',
'jpe' => 'image/jpeg',
'png' => 'image/png',
'tiff' => 'image/tiff',
'tif' => 'image/tiff',
'djvu' => 'image/vnd.djvu',
'djv' => 'image/vnd.djvu',
'wbmp' => 'image/vnd.wap.wbmp',
'ras' => 'image/x-cmu-raster',
'pnm' => 'image/x-portable-anymap',
'pbm' => 'image/x-portable-bitmap',
'pgm' => 'image/x-portable-graymap',
'ppm' => 'image/x-portable-pixmap',
'rgb' => 'image/x-rgb',
'xbm' => 'image/x-xbitmap',
'xpm' => 'image/x-xpixmap',
'xwd' => 'image/x-xwindowdump',
'igs' => 'model/iges',
'iges' => 'model/iges',
'msh' => 'model/mesh',
'mesh' => 'model/mesh',
'silo' => 'model/mesh',
'wrl' => 'model/vrml',
'vrml' => 'model/vrml',
'css' => 'text/css',
'html' => 'text/html',
'htm' => 'text/html',
'asc' => 'text/plain',
'txt' => 'text/plain',
'rtx' => 'text/richtext',
'rtf' => 'text/rtf',
'sgml' => 'text/sgml',
'sgm' => 'text/sgml',
'tsv' => 'text/tab-separated-values',
'wml' => 'text/vnd.wap.wml',
'wmls' => 'text/vnd.wap.wmlscript',
'etx' => 'text/x-setext',
'xsl' => 'text/xml',
'xml' => 'text/xml',
'mpeg' => 'video/mpeg',
'mpg' => 'video/mpeg',
'mpe' => 'video/mpeg',
'qt' => 'video/quicktime',
'mov' => 'video/quicktime',
'mxu' => 'video/vnd.mpegurl',
'avi' => 'video/x-msvideo',
'movie' => 'video/x-sgi-movie',
'ice' => 'x-conference/x-cooltalk' cisco的产品线有上千款设备，一个一个给你写非的累死。这样吧，我给你写一下系列号。你参考以下：
cisco路由的命名规则都是以CISCO开头比如：cisco1721，cisco2621，cisco3662，cisco3745。这些都是路由器。

比如：cisco2621
其中cisco：是品牌，后面的前两位数字是系列号，这款产品属于2600系列，后两位是具体的型号。
其中cisco路由器有以下几个系列：
cisco2500系列：cisco2501、cisco2502、一直到cisco2514，这些都是国内能见到的设备，再往上就是国外的了，国内很少见到。
cisco1700：1720、1721、1751、1760
cisco1800：1821、1841
cisco2600系列：2610、2611、2620、2621、2651
cisco2600XM系列：2610XM、2611XM、2620XM、2621XM
cisco3600：3620、3640、3660
cisco3700：3725、3745
cisco3800：3825、3845
cisco7200：7204、7206、7204VXR、7206VXR这些都是机箱，使用当中需要引擎的支持（NPE-225、NPE-300、NPE-400、NPE-G1、最新的是NPE-G2）和业务模块的支持东西很多了，这就不写了。
cisco7500：7507、7513 同样也需要引擎的支持（RSP2、RSP4、RSP8、RSP16）和业务模块的支持，7200上的业务模块都能在75上使用，需要一块VIP卡的支持。
在上面就是12000系列：12008，12016这些是目前最高端的。同样也需要引擎和业务模块的支持。

交换：交换机的命名一般是WS开头这个是固定的，再下一个字母有两种一个是C一个是X，C代表固化交换机或者机箱，X代表的是模块。比如看到WS-C3750-24TS-S这个型号的时候我们应该知道他是CISCO交换机固化交换机3750系列，24个以太网口，TS表示是以太口+SFP口后面的S表示是标准版的，相映的型号就是E的，属于增强型或者叫企业版。
再来一个WS-X6748-SFP，ws还是代表交换设备，x表示模块，6表示6000系列，7表示7代产品，48表示48口，SFP表示端口类型（SFP是一种mini接口模块）
交换1900：1924
2900：2924、2924M
2950：2950-24、2950G-24/48、2950C-24、2950T-24、2950SX-24/48
2960：2960-24/48TT-L、/48TC-L
3500：3508G、3524、3548
3550：3550-24-SMI/EMI、3550-48-SMI/EMI、3550-12G/T
3560：3560-24/48也有带G的
3750：3750-24/48-TS-S、3750-24/48-TS-E 3750G-24/48-TS-S、3750G-24/48-TS-E 、3750G-12S
4000：4003、4006
4500：4503、4506、4507R
6000：6006、6009
6500：6506、6509、6513
7600：7609、7613

安全产品就不多说了：都是以PIX开头的
具体是以下几款：pix-501、pix-506、pix-515/E、PIX-525、PIX535、ASA5505、ASA5510、ASA5520、ASA5540、ASA5550。
CISCO防火墙型号大部分都软件区别，硬件是一样的。所以就不多说了。
#groupadd onistall 结果提示：bash: groupadd: command not found 是我变量不对吗？系统怎么会找不到groupadd 这条命令呢。后来一想。原来是su的错。之前是在普通用户下。直接 SU切换到ROOT用户。退出换成SU - 再切换到ROOT用户就好了。 su 只能切换到管理员用户权限,不使用管理员的登陆脚本和搜索路径 su - 不但能切换到管理员权限而且使用管理员登陆脚本和搜索路径使用su - 环境变量也跟着来啦~ database 是ORACLE数据库系统软件，一般只要这个包就可以了。
client是database包的精减包，不包括数据库，只包括客户端访问需要用的相关软件包，主要用于安装在客户端机器上。
gateways是指透明网关用的，如果要从oracle访问其它数据库系统(sqlserver,sybase...)则需要这个包了
clusterware是安装ORACLE集群(rac)时用的
Companion CD: 包含了Oracle Http server, 和HTMLDB,
如果想开发基于HTML DB 的Web 应用程序,必须先安装数据库，
然后安装这张CD

以下参考Oracle OTN()文档"Installation Guide for Linux x86"

文件:	Installation Guide for Linux x86.rar
大小:	958KB
下载:	下载

1、查看物理内存大小，oracle建议内存>1G

#grep MemTotal /proc/meminfo

2、查看swap大小，oracle建议swap为物理内存1.5倍（大于2G时swap分配等于物理内存）

#grep SwapTotal /proc/meminfo

注：物理内存和swap大小也可以通过top命令查看

3、#vi /etc/hosts，在第一行增加

192.168.1.15 OCM.localdomain OCM

4、#groupadd oinstall

注：Oracle软件首次安装，将在/etc/下创建oraInst.loc文件，该文件记录了Oracle Inventory的组名和路径。

5、#groupadd dba

6、#useradd -g oinstall -G dba oracle

注：

（1）-g表示Primary group，必须为Oracle Inventory组，即oinstall；-G表示sencondary group，表示OSDBA组，即DBA。

（2）可以用#id oracle命令查看oracle用户是否已经创建。

（3）默认shell为bash，默认目录是/home/oracle

7、#passwd oracle

8、Linux内核参数调整

#vi /etc/sysctl.conf

添加如下行：

kernel.shmall =
kernel.shmmax = #物理内存一半
kernel.shmmni = 4096
kernel.sem = 250 32000 100 128
fs.file-max = 65536
net.ipv4.ip_local_port_range = 1024 65000
net.core.rmem_default =
net.core.rmem_max =
net.core.wmem_default =
net.core.wmem_max =

（注：

　　sem 4个参数依次为SEMMSL(每个用户拥有信号量最大数)；
　　SEMMNS(系统信号量最大数)；
　　SEMOPM(每次semopm系统调用操作数)；
　　SEMMNI(系统辛苦量集数最大数)。
　　Shmmax 最大共享内存1GB
　　物理内存如果小的话可以设置成。
　　Shmmni 最小共享内存 4096KB。
　　Shmall 所有内存大小。

）

9、设定oracle用户的shell限制以提高性能。

a. 在/etc/security/limits.conf中增加如下几行：

oracle soft nproc 2047
oracle hard nproc 16384
oracle soft nofile 1024
oracle hard nofile 65536

b. 在/etc/pam.d/login中增加如下两行：

session required /lib/security/pam_limits.so
session required pam_limits.so

c. 在/etc/profile中增加如下：

if [ $USER = "oracle" ]; then
if [ $SHELL = "/bin/ksh" ]; then

   ulimit -p 16384
   ulimit -n 65536
else
   ulimit -u 16384 -n 65536
fi
fi

10、创建Oracle Base目录/u01/app/oracle

# mkdir -p /u01/app/oracle
# chown -R oracle:oinstall /u01
# chmod -R 775 /u01

11、在挂载点下创建相应子目录，更改属组以及权限

■ Database file directory:
# mkdir /u01/oradata
# chown oracle:oinstall /u01/oradata
# chmod 775 /u01/oradata
■ Recovery file directory (flash recovery area):
# mkdir /u01/flash_recovery_area
# chown oracle:oinstall /u01/flash_recovery_area
# chmod 775 /u01/flash_recovery_area

12、切换到Oracle用户

# su - oracle

$ echo $SHELL //RHEL AS4 默认shell为bash

$ vi .bash_profile //Red Hat Linux，Bash Shell默认的用户启动文件为.bash_profile

13、在.bash_profile添加如下行

ORACLE_BASE=/u01/app/oracle
ORACLE_SID=ocm
export ORACLE_BASE ORACLE_SID

umask 022

注： umask表示反掩码，默认创建文件夹时权限为755(777-022)，创建文件时权限为644(666-022)

退出保存.bash_profile

14、使当前环境变量生效

$. http://blog.chinaunix.net/.bash_profile

注：两个.之间有个空格；.bash_profile的文件权限是644，所以Oracle用户没有执行权限，不能直接使用http://blog.chinaunix.net/.bash_profile执行是环境变量生效。亦可退出oracle用户，在su - oracle使环境变量生效。

15、用root用户禁用X window的接入控制，使所有客户端都能连接X window server

# xhost +

16、使X window能在本地显示

$ export DISPLAY=127.0.0.1:0.0

注：如果通过xmanager之类的远程连接服务器，把127.0.0.1改成当地IP即可。

17、用Oracle用户FTP10201_database_linux32.zip到/tmp目录下。

注：Oracle 10g for linux x86下载地址

18、解压

$ unzip 10201_database_linux32.zip

19、运行http://blog.chinaunix.net/runInstaller，因为准备手工创建数据库，所以不选“Create Starter Database”

20、下图默认，单击Next

21、安装前提检查，检查成功后，单击Next

22、安装收集完信息后，单击Next

23、开始安装

24、安装过程需要用root用户执行两个脚本

25、另外打开个终端窗口，用root用户执行该两个脚本。

26、执行完毕后继续完成安装；点击如下图Exit完成Oracle软件安装

27、把环境变量ORACLE_HOME写入.bash_profile文件中

#设置 ORACLE_HOME

    ORACLE_BASE=/u01/app/oracle
    ORACLE_HOME=$ORACLE_BASE/oracle/product/10.2.0/db_1
    PATH=$ORACLE_HOME/bin:$PATH
    export ORACLE_BASE ORACLE_HOME PATH

28、创建数据库

#su - oracle

[oracle@ocm bin]$ dbca

弹出创建数据库的界面窗口。

注意：如果 ORACLE_HOME设置不对，这会提示command not found

29、启动数据库

    #su - oracle
    [oracle@ocm bin]$ sqlplus /nolog
    SQL>conn /as sysdba
    SQL>startup
    然后启动监听:
    进入/u01/app/oracle/oracle/product/10.2.0/db_1/bin
    [oracle@ocm bin]$ lsnrctl start

30、关闭数据库

    #su - oracle
    [oracle@ocm bin]$ sqlplus /nolog
    SQL>conn /as sysdba
    SQL>shutdown

关闭监听程序

[oracle@ocm bin]$ lsnrctl

LSNRCTL> stop

妥了！

kernel.shmall的单位是页面数，当前的x86体系上这个单位是4K ，oracle的默认安装参数是

kernel.shmall = 则一共是8G的共享内存总量

kernel.shmall：共享内存总量，以页为单位。

总的来说，这个参数和你具体硬件关系不太大，只是大于8G的时候调整到合适你的内存容量大小，小于8G就不用了

REDHAT AS4 kernel.sem设置参考

REDHAT AS4 kernel.sem设置参考
在安装oracle 之前通常需要设置kernel.sem这个参数，下面对些作简单介绍
sem其实是semaphores的缩写，查看当前设置
[oracle@ebsse oracle]$ cat /proc/sys/kernel/sem
250 32000 100 128
4个数据分别对应
SEMMSL SEMMNS SEMOPM SEMMNI
如当oracle DB初始化参数文件中PROCESSES参数设置较大时，需要调整SEMAPHORES设置
SEMMSL应该设置为服务器中各个实例中最大的PROCESSES参数+10，例如，当最大的PROCESSES参数为5000时，SEMMSL应设置为5010。
SEMMNS参数应设置为SEMMSL*SEMMNI，接上例SEMMSL为5010，SEMMNS参数应为（5010*128）=。
SEMOPM参数应设置与SEMMSL参数相同，接上例此处应设置为5010
更改当前SEMAPHORES参数设置：
[oracle@ebsse oracle]$ su
Password:
[root@ebsse oracle]# echo "5010 5010 128" > /proc/sys/kernel/sem
[root@ebsse oracle]# cat /proc/sys/kernel/sem
5010 5010 128
如需启动时自动应用，可在/etc/sysctl.conf增加：
kernel.sem =5010 5010 128

到此这篇简单好玩的编程代码简单（简单实用的编程代码）的文章就介绍到这了,更多相关内容请继续浏览下面的相关推荐文章，希望大家都能在编程的领域有一番成就！

上一篇：编程入门作品（编程入门课程视频）

下一篇：编程初级入门教程（编程初级入门教程下载）

版权声明：
本文来自互联网用户投稿，该文观点仅代表作者本人，不代表本站立场。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。
如若内容造成侵权、违法违规、事实不符，请将相关资料发送至xkadmin@xkablog.com进行投诉反馈，一经查实，立即处理！

转载请注明出处，原文链接：https://www.xkablog.com/androidbc/23107.html

相关文章：