Asp编程(第18页):
- 代码如下:<% Function Bytes2bStr(vin,cSet) Dim BytesStream,StringReturn Set BytesStream = Server.Creat
发布时间:2011-02-24 11:19:00 - 测试代码:输出简单的ul li1.asp代码如下:<% response.write "<ul>" response.write "<li>
发布时间:2011-02-24 11:15:00 - 代码如下: var lishustr = "qwertyuiopasdfghjklmnbvcxz"; var s = lishustr.split(""); v
发布时间:2011-02-24 11:07:00 - 代码如下: <!-- #include file="../conn.asp" --> <!-- #include file="../cls_main.a
发布时间:2011-02-24 11:01:00 - 通过HTTP_USER_AGENT判断用户是从手机上访问,还是电脑IE上访问。 asp代码片段:主要使用了正则匹配手机环境,大家可以补充手机平台。 代码如下:set regex = new regex
发布时间:2011-02-24 11:00:00 - 代码如下: '排序 Function Sort1(ary) Dim KeepChecking,I,FirstValue,SecondValue KeepChecking = TRUE Do U
发布时间:2011-02-24 11:00:00 - rs.open sql,conn:如果sql是delete,update,insert则会返回一个关闭的记录集,在使用过程中不要来个rs.close在文件最后再写rs.close 中间可以来多个记录集
发布时间:2011-02-24 10:56:00 - 经常开发asp但对于细致的说法,真实不太清楚,这里简单的介绍下。一般情况下读取数据都是用rs.open sql,conn,1,1修改数据:rs.open sql,conn,1,3删除数据:直接要con
发布时间:2011-02-24 10:49:00 - 代码如下: <%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Response.CodePage=65
发布时间:2011-02-24 10:49:00 - 代码如下:'============================== '格式化HTML,SDCMS加强版 '============================== F
发布时间:2011-02-20 11:18:00 - 代码如下: Function NumberSplit(num) Dim i,length length=Len(num) For i=1 To length NumberSplit=NumberSpl
发布时间:2011-02-20 11:06:00 - ①.页面文件使用正确的编码,gb2312使用ANSI,utf-8使用utf-8; ②.ASP代码中设置正确的CODEPAGE,gb2312使用936,utf-8使用65001; ③.HTML代码中设置
发布时间:2011-02-20 11:00:00 - 代码如下:'===================================== '获得文件后缀 '===================================
发布时间:2011-02-20 11:00:00 - 文件名称:ByVal.aspByRef.asp具体代码:<%Sub TestMain()Dim A : A=5Call TestBy(A)Response.write AEnd SubSub T
发布时间:2011-02-20 10:57:00 - 代码如下:'===================================== '获取内容中所有图片 '================================
发布时间:2011-02-20 10:51:00 - 代码如下: <% Dim oConn, ors, aRows Dim i,j Set oConn=Server.CreateObject("ADODB.Connection"
发布时间:2011-02-20 10:48:00 - 代码如下:'===================================== '转换内容,防止意外 '================================
发布时间:2011-02-20 10:40:00 - 代码如下: public function fillzero(l1) if len(l1)=1 then fillzero="0"&l1 else fillzero=l1
发布时间:2011-02-20 10:39:00 - 代码如下:Function getCurrentUrl() On Error Resume Next Dim strTemp If LCase(Request.ServerVariables(&quo
发布时间:2011-02-20 10:37:00 - 在ASP输出页面只是调出数据库里内容展现给用户看没有使用SESSION等动态属性,是可以CACHE的,以加快访问速度具体操作方法如下:在asp程序页面顶上端加上: <% @Language=&q
发布时间:2011-02-16 11:20:00