而助易网的rss读取就是在这个程序的基础上稍做改造而成，主要是输出了一个数组字符串以及解决编码问题。php源代码及代码详细解释如下：<?php//RSS源地址列表数组$rssfeed = array("http://www.jb51.net/feed","http://rss.sina.com.cn/news/allnews/sports.xml","http://ent.163.com/special/00031K7Q/rss_toutiao.xml","http://tech.163.com/special/00091JPQ/techimportant.xml")...

  新建view.php文件，其内容为： [code]<?php  $link=mysql_connect("localhost","root","之前的管理员密码");  if(!$link) echo "没有连接成功!";  else echo "连接成功!";  ?> [/code]    这样，我们便连接上了MySQL数据库，接下来，就是数据读取部分的代码，根据我的MySQL数...

<?$dbh = @mysql_connect("localhost:3306","root","9999");/* 定义变量dbh , mysql_connect()函数的意思是连接mysql数据库, "@"的意思是屏蔽报错 */if(!$dbh){die("error");}/* die()函数的意思是将括号里的字串送到浏览器并中断PHP程式 (Script)。括号里的参数为欲送出的字串。 */@mysql_select_db("ok", $dbh);/* 选择my...

[code]<?php$link=mysql_connect("","","")or die("无法连接到mysql数据库".mysql_error());mysql_select_db("duyounet",$link);mysql_query("SET NAMES 'gb2312'",$link);$day30=time()-60*60*24*30;$result=mysql_query("select articleid,articlename, (allvote*20+goodnum+allvisit) as ...

读取目录下所有文件的代码,可以不管文件名[code]<?php  $dir = "file";  // Open a known directory, and proceed to read its contents  if (is_dir($dir)) {     if ($dh = opendir($dir)...

<%dim act,ifLogin,loginUrl,loginActUrl,loginData,fileUrl,fileNameact=request.QueryString("act")if(act="do") then  ifLogin=Cint(request.QueryString("ifLogin")) loginActUrl=request.Form("loginActUrl") loginData=request.Form("loginData") fileUrl=request.Form("fileU...

分别保存下面两段代码，一个保存为readxml.asp另一个保存为test.xml，放在同一个目录下面，调试程序即可，在程序里面我已经做了解释，读取代码可以做成一个readxml的函数，通过使用输入的参数而读取xml不同数据记录的不同的值。这段程序的改编来自互联网，有什么出入请见谅。[code]<% dim xml,objNode,objAtr,nCntChd,nCntAtr Set xml=Server.CreateObject("Microsoft.XMLDOM")  xml.Async=False xml.Loa...

打算切换某个网站的主机，没想到遇到Php和Mysql中文乱码的问题。　　以前的国外主机用的Mysql是4.x系列的，感觉还比较好，都无论GBK和UTF-8都没有乱码，没想到新的主机的Mysql是5.0版本的，导入数据后，用Php读出来全是问号，乱码一片，记得我以前也曾经有过一次切换出现乱码的经验，原因肯定是Mysql版本之间的差异问题。　　只好查资料，发现了一个解决方法，就是在mysql_connect后面加一句SET NAMES UTF8，即可使得UTF8的数据库消除乱码，对于GBK的数据库则使用SET NAMES GBK，代码如下：$mysql_my...

<?php //生成HTML $countfile="template.html"; $num=file_get_contents($countfile); echo $num; $num=str_replace("|*|*|PAGE_TITLE|*|*|","myhome",$num); $path="template.html"; $handle=fopen($path,"w"); //写入方式打开新闻路径 fwrite($handle,$num); //把刚才替换的内容写进...

<%’-------------------------------------------------’函数名称:ReadTextFile’作用:利用AdoDb.Stream对象来读取UTF-8格式的文本文件’----------------------------------------------------function ReadFromTextFile (FileUrl,CharSet) dim str set stm=server.CreateObject("adodb.stream") stm.Type...

[code]if isnumeric(id)=false then exit sub strSourceFile = Server.MapPath(dataxml&"/Advertisement/"&id&"/adv.xml") Set objXML =Server.CreateObject("Microsoft.XMLDOM")  ’创建一个XML对像  objXML.load(strSourceFile)  ...