asp的幾個fso 相關的函數
[
2007/12/31 09:56 | by wpsni ]
2007/12/31 09:56 | by wpsni ]
'**************************************************
'函数名：FSOFileRead
'作 用：使用FSO读取文件内容的函数
'参 数：filename ----文件名称
'返回值：文件内容
'**************************************************
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
'函数名：FSOFileRead
'作 用：使用FSO读取文件内容的函数
'参 数：filename ----文件名称
'返回值：文件内容
'**************************************************
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
gb18030今天你用了?
[ 2007/12/30 16:26 | by Else ]
2007/12/30 16:26 | by Else ]
今天看到这个，决定用这个了，介绍网上很多，大家可以去看一下，同时希望做网站的朋友，可以把gb2312改成gb18030
清华大学经济管理硕士，信息产业部电子工业标准化研究所副所长，全国信息技术标准化技术委员会副秘书长，承担多项国家级项目的标准化工作，并曾出版多本著述。
国家标准GB18030-2000《信息交换用汉字编码字符集基本集的扩充》是我国继GB2312-1980和GB13000-1993之后最重要的汉字编码标准，是未来我国计算机系统必须遵循的基础性标准之一。为保证该标准顺利贯彻执行，国家质监总局将在9月1日起首先对影响广泛的计算机操作系统进行执法检查，凡不符合该标准的产品，视为不合格产品。为此，全国信息技术标准化技术委员会将根据有关标准和规范，组织对市场上主要的操作系统产品进行标准符合性检测。
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
改成
<meta http-equiv="Content-Type" content="text/html; charset=gb18030" />
改成
<meta http-equiv="Content-Type" content="text/html; charset=gb18030" />
清华大学经济管理硕士，信息产业部电子工业标准化研究所副所长，全国信息技术标准化技术委员会副秘书长，承担多项国家级项目的标准化工作，并曾出版多本著述。
国家标准GB18030-2000《信息交换用汉字编码字符集基本集的扩充》是我国继GB2312-1980和GB13000-1993之后最重要的汉字编码标准，是未来我国计算机系统必须遵循的基础性标准之一。为保证该标准顺利贯彻执行，国家质监总局将在9月1日起首先对影响广泛的计算机操作系统进行执法检查，凡不符合该标准的产品，视为不合格产品。为此，全国信息技术标准化技术委员会将根据有关标准和规范，组织对市场上主要的操作系统产品进行标准符合性检测。
在et上分页的php设计(php分页)
[ 2007/12/29 04:18 | by Else ]
2007/12/29 04:18 | by Else ]
//处理分页
$page=1; //起始的记录
$pagelist=2; //每页显示的记录
if (isset($_GET['page'])) {
$page = $_GET['page'];
}
$sqlstr = "select * from cuku_products order by id desc "; //所有的记录
//算总的记录
if (isset($_GET['total'])) {
$total = $_GET['total'];
} else {
$all_rs = $db->query($sqlstr);
$total= $db->num_rows($all_rs); //总得记录
}
$page=1; //起始的记录
$pagelist=2; //每页显示的记录
if (isset($_GET['page'])) {
$page = $_GET['page'];
}
$sqlstr = "select * from cuku_products order by id desc "; //所有的记录
//算总的记录
if (isset($_GET['total'])) {
$total = $_GET['total'];
} else {
$all_rs = $db->query($sqlstr);
$total= $db->num_rows($all_rs); //总得记录
}
Visual C# 2005编译器选项 csc的應用
[ 2007/12/25 10:45 | by Else ]
2007/12/25 10:45 | by Else ]
Visual C# 2005 編譯器選項
- 輸出檔 -
/out: 指定輸出檔名 (預設: 具有主要類別或是第一個檔案的檔案主檔名)
/target:exe 建置主控台可執行檔 (預設) (簡短形式: /t:exe)
/target:winexe 建置 Windows 可執行檔 (簡短形式: /t:winexe)
/target:library 建置程式庫 (簡短形式: /t:library)
/target:module 建置可以加入至其他組件的模組 (簡短形式: /t:module)
/delaysign[+|-] 只使用強式名稱金鑰的公開金鑰延遲簽署組件
/doc: 要產生的 XML 文件檔案
/keyfile: 指定強式名稱金鑰檔
/keycontainer: 指定強式名稱金鑰容器
/platform: 限制這個程式碼可以在哪些平台執行: x86、Itanium、x64 或 anycpu。預設為 anycpu。
- 輸出檔 -
/out:
/target:exe 建置主控台可執行檔 (預設) (簡短形式: /t:exe)
/target:winexe 建置 Windows 可執行檔 (簡短形式: /t:winexe)
/target:library 建置程式庫 (簡短形式: /t:library)
/target:module 建置可以加入至其他組件的模組 (簡短形式: /t:module)
/delaysign[+|-] 只使用強式名稱金鑰的公開金鑰延遲簽署組件
/doc:
/keyfile:
/keycontainer:
/platform:
C#连接Access成功
[ 2007/12/24 00:48 | by Else ]
2007/12/24 00:48 | by Else ]
C#链access 之前一直用链接sqlserver的函数做程序,一直出错,现在可以了
using System;
using System.Collections.Generic;
using System.Text;
using System.Data;
using System.Data.OleDb;
namespace test.src.util
{
public class DbConnction
{
public DbConnction()
{
//
}
static void Main(string[] args)
{
String connectionString = "Provider=Microsoft.Jet.OleDb.4.0;Data Source=";
connectionString += @"d:\data.mdb";
OleDbConnection myConnection = new OleDbConnection(connectionString);
myConnection.Open(); //打开数据库链接
OleDbCommand myCommand = myConnection.CreateCommand(); //定义SqlCommand变量
myCommand.CommandText = "select * from ruby"; //设置SQL语句
OleDbDataReader myDataReader = myCommand.ExecuteReader(); // 从数据库获职数据
//读取DataReader中的数据并输出
while (myDataReader.Read())
{
Console.WriteLine("\t{0}\t{1}", myDataReader["id"], myDataReader["title"]);
}
myDataReader.Close(); //关闭SqlDataReader
myConnection.Close(); //关闭链接
Console.WriteLine("这个是一个链接的测试");
}
}
}
using System.Collections.Generic;
using System.Text;
using System.Data;
using System.Data.OleDb;
namespace test.src.util
{
public class DbConnction
{
public DbConnction()
{
//
}
static void Main(string[] args)
{
String connectionString = "Provider=Microsoft.Jet.OleDb.4.0;Data Source=";
connectionString += @"d:\data.mdb";
OleDbConnection myConnection = new OleDbConnection(connectionString);
myConnection.Open(); //打开数据库链接
OleDbCommand myCommand = myConnection.CreateCommand(); //定义SqlCommand变量
myCommand.CommandText = "select * from ruby"; //设置SQL语句
OleDbDataReader myDataReader = myCommand.ExecuteReader(); // 从数据库获职数据
//读取DataReader中的数据并输出
while (myDataReader.Read())
{
Console.WriteLine("\t{0}\t{1}", myDataReader["id"], myDataReader["title"]);
}
myDataReader.Close(); //关闭SqlDataReader
myConnection.Close(); //关闭链接
Console.WriteLine("这个是一个链接的测试");
}
}
}
$insertGoTo = "admin.php";
if (isset($_SERVER['QUERY_STRING'])) {
$insertGoTo .= (strpos($insertGoTo, '?')) ? "&" : "?";
$insertGoTo .= $_SERVER['QUERY_STRING'];
}
header(sprintf("Location: %s", $insertGoTo));
if (isset($_SERVER['QUERY_STRING'])) {
$insertGoTo .= (strpos($insertGoTo, '?')) ? "&" : "?";
$insertGoTo .= $_SERVER['QUERY_STRING'];
}
header(sprintf("Location: %s", $insertGoTo));
今天收到70元的广告费
[ 2007/12/19 21:56 | by Else ]
2007/12/19 21:56 | by Else ]
using System;
using System.Collections.Generic;
using System.Text;
public class Test2
{
public void aaB(string a, int b)
{
if(a!=null)
{
Console.WriteLine("The stirng is " + a + ", the number is " + b);
}
else
{
Console.WriteLine("error");
}
}
public void checkType(object type)
{
Console.WriteLine("The "+type+" type is {0},", type.GetType());
}
public static void Main()
{
Test2 ts = new Test2();
string a="my name is a";
int b=3662296;
ts.aaB(a,b);
int i = 5;
string k="哈,今天的天氣不錯,我叫string ";
Console.WriteLine("i is an int ? {0}" , i.GetType() == typeof(int));
Console.WriteLine("i is an int ? {0}" , typeof(int).IsInstanceOfType(i));
Console.WriteLine("k is an int ? {0}" , typeof(int).IsInstanceOfType(k));
Console.WriteLine("The type of k is {0},",k.GetType());
ts.checkType(k);
ts.checkType(i);
}
}
using System.Collections.Generic;
using System.Text;
public class Test2
{
public void aaB(string a, int b)
{
if(a!=null)
{
Console.WriteLine("The stirng is " + a + ", the number is " + b);
}
else
{
Console.WriteLine("error");
}
}
public void checkType(object type)
{
Console.WriteLine("The "+type+" type is {0},", type.GetType());
}
public static void Main()
{
Test2 ts = new Test2();
string a="my name is a";
int b=3662296;
ts.aaB(a,b);
int i = 5;
string k="哈,今天的天氣不錯,我叫string ";
Console.WriteLine("i is an int ? {0}" , i.GetType() == typeof(int));
Console.WriteLine("i is an int ? {0}" , typeof(int).IsInstanceOfType(i));
Console.WriteLine("k is an int ? {0}" , typeof(int).IsInstanceOfType(k));
Console.WriteLine("The type of k is {0},",k.GetType());
ts.checkType(k);
ts.checkType(i);
}
}
原来可以这么简单,只是没有动手,关于et的多级分类显示
[ 2007/12/18 02:50 | by Else ]
2007/12/18 02:50 | by Else ]
简单的就这么点,无限分类的,还要等待
<select name="catid" id="catid">
<!--$list as $rs-->
<optgroup label="{rs['classname']}" title="{rs['content']}">
<!-- <option value="{rs['id']}">{rs['classname']}</option>-->
<!-- $rs['a'] AS $rs -->
<option value="{rs['id']}">{rs['classname']}</option>
<!-- end-->
<!-- end-->
</select>
<!--$list as $rs-->
<optgroup label="{rs['classname']}" title="{rs['content']}">
<!-- <option value="{rs['id']}">{rs['classname']}</option>-->
<!-- $rs['a'] AS $rs -->
<option value="{rs['id']}">{rs['classname']}</option>
<!-- end-->
<!-- end-->
</select>
