博文
ASP查询XML输出(2006-06-15 17:27:00)
摘要：<%
'IP检查
ip=Request.ServerVariables("REMOTE_ADDR")
IF ip<>"211.151.23.203" Then Response.End
Dim conn
Set conn = Server.CreateObject("ADODB.Connection")
'SQL Server数据库链接
Dim StrServer,StrUid,StrSaPwd,StrDbName,StrDSN
StrServer ="61.156.25.37" '数据库服务器名
StrUid ="lyhousedx" '您的登录帐号
StrSaPwd ="admin_insert" '您的登录密码
StrDbName ="yangchengzhi" '您的数据库名称
StrDSN ="driver={SQL server};server="&StrServer&";uid="&StrUid&";pwd="&StrSaPwd&";database="&StrDbName
'建立数据库链接
conn.Open StrDSN
set Tmp=server.createobject("adodb.recordset")
sql = request("sql")
'response.write sql
Tmp.open sql,conn,1,1
ReDim FieldsName(Tmp.Fields.Count)
For i=0 to Tmp.Fields.Count-1
&......
php-asp-MSSQL(2005-09-14 13:58:00)
摘要：<?php
class php_asp_db{
var $Fields = array();
var $Records = array();
var $Recnum;
var $Fieldcount;
function php_asp_db(){}
function Query($sql){
//取交警服务器IP
$fp = fopen("/www/webroot/TrafficIP.txt", "r");
if (flock($fp, LOCK_SH)) {
$IP = fgets($fp, 20);
$IP = substr($IP,0,strlen($IP)-1);//去除最后一个回车
flock($fp, LOCK_UN);
}
else {//取IP失败
echo "连接服务器失败，请稍后重试";
&nb......
彩字图片处理程序(2005-09-14 13:53:00)
摘要：<?php
/**
功能：获得一个图片文件的尺寸大小，返回一个数组
参数：
filename：图片文件名
*/
function GetFileSize($filename){
$str = exec("identify '$filename'");
$s = split(" ",$str);
$s = split("x",$s[2]);
return $s;
$src_image_w=$s[0];
$src_image_h=$s[1];
}
/**
功能：将多个GIF文件合成一个
参数：
scr：原文件名列表
dst：目的文件名
pos_x,pos_y：合成后的图片位置列表
delay：图片间隔显示时间
loop：图片循环次数；0，无限循环
*/
function ComposeGIF($src = array(),$dst,$pos_x = array(),$pos_y = array(),$delay=100,$loop=0){
$s = GetFileSize($dst);
$src_image_w=$s[0];
......
彩印图片处理程序(2005-09-14 13:52:00)
摘要：#!/usr/local/bin/php -q
<?php
Class GIF1{
/**
功能：将多个GIF文件合成一个
参数：
scr：原文件名列表
dst：目的文件名
pos_x,pos_y：合成后的图片位置列表
delay：图片间隔显示时间
loop：图片循环次数；0，无限循环
*/
function ComposeGIF($src = array(),$dst,$pos_x = array(),$pos_y = array(),$delay=100,$loop=0){
$s = GetFileSize($dst);
$src_image_w=$s[0];
$src_image_h=$s[1];
//$cmdline = "convert -delay
$delay -size ".$src_image_w."x".$src_image_h." -page +0+0 $dst";
for($i=0;$i<count($src);$i++){
//$cmdline .= " -page +".$po......
取客户端IP的函数(2005-09-14 13:50:00)
摘要：function get_client_realip()
{
global $_SERVER;
if (isset($_SERVER["HTTP_X_FORWARDED_FOR"]))
{
$realip = $_SERVER["HTTP_X_FORWARDED_FOR"];
}
elseif (isset($_SERVER["HTTP_CLIENT_IP"]))
{
$realip = $_SERVER["HTTP_CLIENT_IP"];
}
else
{
$realip = $_SERVER["REMOTE_ADDR"];
}
return $realip;
}
function get_client_ip()
{
global $_SERVER;
return $_SERVER["REMOTE_ADDR"];
}......