自定义的一个读取咨询数据的计划任务，但不能更新，求助

1. <?php
   
2. 
   
3. if(!defined('IN_SUPESITE')) {
   
4. 
   
5.         exit('Access Denied');
   
6. 
   
7. }
   
8. 
   
9. 
   
10. ///创建文件
    
11. function substr_cut($str_cut,$length = 30){
    
12. 
    
13.         if (strlen($str_cut) > $length){
    
14.   for($i=0; $i < $length; $i++)
    
15.           if (ord($str_cut[$i]) > 128)        $i++;
    
16.   $str_cut = substr($str_cut,0,$i) . "...";
    
17.         }
    
18.         return $str_cut;
    
19. }
    
20. 
    
21. 
    
22. function creat_file($PATH,$file_name,$data){
    
23. 
    
24.     $fp= fopen($PATH.$file_name,"w");
    
25. 
    
26.         if (fwrite($fp, $data) === FALSE) {
    
27. 
    
28.         echo "不能写入到文件 $filename";
    
29. 
    
30.         exit;
    
31. 
    
32. 
    
33. 
    
34.     fclose($fp);
    
35. 
    
36.    }
    
37. 
    
38.    return $sFile;
    
39. 
    
40. }
    
41. 
    
42. $data="<?xml version="1.0" encoding="GBK"?>\n<document>\n";
    
43. 
    
44. 
    
45. 
    
46. 
    
47. 
    
48. include_once(S_ROOT."/config.php");
    
49. 
    
50. $link = mysql_connect($dbhost, $dbuser, $dbpw)
    
51. 
    
52.     or die('Could not connect: ' . mysql_error());
    
53. 
    
54. //echo 'Connected successfully';
    
55. 
    
56. mysql_select_db($dbname) or die('Could not select database');
    
57. 
    
58. $query="SELECT a.itemid,a.subject,c.filepath,b.message FROM supe_spaceitems a inner join supe_spacenews b on b.itemid=a.itemid inner join supe_attachments c on (c.itemid = b.itemid and c.aid = a.picid) WHERE a.haveattach = 1 and c.isimage = 1 and a.digest = 2 ORDER BY a.dateline desc limit 0 ,5 ";
    
59. 
    
60. echo "$query";
    
61. 
    
62. mysql_query("SET names 'GBK'",$link);
    
63. 
    
64. $result=mysql_query($query,$link);
    
65. 
    
66. while($arr_result=mysql_fetch_array($result,MYSQL_ASSOC)){
    
67. 
    
68.                 //$arr_pro[]=array("pro_id"=>$arr_result["filepath"]);
    
69. 
    
70.                 $data=$data."<item>\n"."<image>/attachments/".$arr_result["filepath"]."</image>\n"."<smallimage>media/01s.jpg</smallimage>\n"."<video>"."http://www.un739.com/?action-viewnews-itemid-".$arr_result["itemid"]."</video>\n"."<captionlines>4</captionlines>\n"."<headline><a href="/?action-viewnews-itemid-".$arr_result["itemid"]."""." target="_blank">".substr_cut(strip_tags($arr_result["subject"]),42)."</a></headline>\n"."<caption>".substr_cut(str_replace("\r\n","",str_replace(" ","",strip_tags($arr_result["message"]))),100)."...</caption>\n<photocaption></photocaption>\n</item>\n";
    
71. 
    
72.         }
    
73. 
    
74. //print_r ($arr_pro);
    
75. 
    
76. $data=$data."</document>";
    
77. 
    
78. creat_file("./","41.xml",$data);
    
79. 
    
80. 
    
81. 
    
82. ?>

复制代码

放在后台后，点立即执行，提示完成，但是根目录下的41.xml根本没有写进数据，注：41.xml权限是777的

杂没一个人回呢？我人品有问题吗？

在顶一次