搜索列表
-
如何编写一个小数转换分数的函数?
【编程10000问】Public Function XtoF(str As Currency, Optional fenm As Integer = 32) As String ' 只限于整除分数. Dim Cfm As Currency Dim cfmmod As Integer On Error GoTo Erroreof Cfm = 1 / fenm XtoF = "" If str = 0 Then XtoF = "": Exit Functi...
|如何|何编|编写|写一|一个|个小|小数|数转|转换|换分|分数|数的|的函|函数|数?|?| -
如何用下拉列表显示数据库里的内容?
【编程10000问】<%Dim objDC, objRSSet objDC = Server.CreateObject("ADODB.Connection")objDC.ConnectionTimeout = 15objDC.CommandTimeout = 30' 创建数据库连接objDC.Open "DBQ=" & Server.MapPath("database.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};DriverI...
|如何|何用|用下|下拉|拉列|列表|表显|显示|示数|数据|据库|库里|里的|的内|内容|容?|?| -
如何编写一个创建FTP站点的函数?
【编程10000问】如何编写一个创建FTP站点的函数?Function ASTCreateFtpSite(IPAddress, RootDirectory, ServerComment, HostName, PortNum, Computer, Start,LogFileDirectory) Dim MSFTPSVC, FtpServer, ...
|如何|何编|编写|写一|一个|个创|创建|建F|FT|TP|P站|站点|点的|的函|函数|数?|?| -
如何制作一个Web日程安排表?
【编程10000问】chunfeng.asp' 该页面可以看到已安排了哪些事情,并在底部链接可按月前后翻动.' 该代码包含获得数据连接的函数,如果数据源一旦有变化,则只有一个位置需要编辑连接信息(服务器、用户和口令). <@ LANGUAGE="VBscript" ENABLESESSIONSTATE = False %> <% ' 表...
|如何|何制|制作|作一|一个|个W|We|eb|b日|日程|程安|安排|排表|表?|?| -
ASP问答集
【编程10000问】问:为什么我的记录集的RecordCount值总是返回-1? 答:你应当使用这种模式来打开存取数据库的记录集: rec.open strSQL,conn,1,1 其中的strSQL是操作数据库的SQL语句;conn是联接数据库的Connection 变量。 问:我在ASP脚本中写了很多的注释...
|AS|SP|P问|问答|答集|集| -
如何用ASP输出HTML文件?
【编程10000问】<!--#include file="top.inc"--><%u_title=request.form("u_title")' 检查标题是否被输入.if u_title = "" then%><form method="POST" action="<%= request.servervariables("script_name") %>"> <!--当没有标题输入时显示输入框--> <p>文件标题<...
|如何|何用|用A|AS|SP|P输|输出|出H|HT|TM|ML|L文|文件|件?|?| -
如何用ASP建立Index Server查询对象并为其参数赋值?
【编程10000问】一个方法是利用Index Server query object和参数:<% Set Q= Sever.CreatObject("ixsso.Query") ' 创建查询对象. Set Util= Sever.CreatObject("ixsso.Util") Q.Query= Request("SearchString") ' 查询字段....
|如何|何用|用A|AS|SP|P建|建立|立I|In|nd|de|ex|xS|Se|er|rv|ve|er|r查|查询|询对|对象|象并|并为|为其|其参|参 -
如何显示最后十名来访者?
【编程10000问】<%Application.LockIF NOT isArray( Application( "lastTen" ) ) THEN DIM dummy( 10, 3 ) Application( "lastTen" ) = dummy' 创建或者取得最近10个Application数组.END IF lastTen = Application( "lastTen" )Application.UnLockIF lastTen( 9, 0 ) <> ...
|如何|何显|显示|示最|最后|后十|十名|名来|来访|访者|者?|?| -
如何显示最后十名来访者?
【编程10000问】<%Application.LockIF NOT isArray( Application( "lastTen" ) ) THEN DIM dummy( 10, 3 ) Application( "lastTen" ) = dummy' 创建或者取得最近10个Application数组.END IF lastTen = Application( "lastTen" )Application.UnLockIF lastTen( 9, 0 ) <> ...
|如何|何显|显示|示最|最后|后十|十名|名来|来访|访者|者?|?| -
忠网广告 系统 用到的几个函数
【ASP编程】复制代码 代码如下:<% '///****************************************************************** ' 常用公共函数库 文件名:PubFunction.asp '******************************************************************/// Const Go_back="<a hre...
忠网广告系统用到的几个函数 -
在ASP中连接MySQL数据库,最好的通过ODBC方法
【ASP编程】折腾了一阵,总算把ASP和MySQL连接完成了,有感,特写此文与大家一同分享。 查了很多资料,ASP和MySQL连接目前有两种办法:一个是使用组件,比较有名是MySQLX,可惜要99美元。二就是使用MyODBC 来连接,下面我们 就来看看第二种方式。 试验的平台: MySQL 4.0 For RadHat Linux (也可...
在ASP中连接MySQL数据库,最好的通过ODBC方法 -
ASP中FSO对象对IIS WEB服务器数据安全的威胁及对策
【ASP编程】scripting.filesystemobject 对象是由 scrrun.dll 提供的许多供 vbscript/jscript 控制的 com 对象之一。scripting.filesystemobject 提供了非常便利的文本文件和文件目录的访问,但是同时也对 iis web 服务器数据安全造成了一定的威胁。 filefinder 的代码很简单,由3 个函数和 30 行左右的顺序代码构成。 最关键的是 find...
|AS|SP|P中|中F|FS|SO|O对|对象|象对|对I|II|IS|SW|WE|EB|B服|服务|务器|器数|数据|据安|安全|全的|的威|威胁|胁及|及