论坛徽章:: 0

电梯直达

1楼 [收藏(0)] [报告]

发表于 2006-02-17 06:38 |只看该作者 |倒序浏览

如果下面把下面的代码写成html+javascript就能运行，
但是我想把它写在 .cgi程序里，但是点击button的时候浏览器没有相应。
请大家指点一下。。。谢

#!/usr/bin/perl
use CGI;
$q = new CGI; # create new CGI object
print $q->header; # create the HTTP header
$JSCRIPT =<<END;
var httpRequest;
/**
* process ...
*/
function process()
{
` alert("hi");
var contentViewer = document.getElementById("contentViewer");
contentViewer.innerHTML = "<b style='color:red;'>Loading....<b>";
if (window.ActiveXObject)
{
httpRequest = new ActiveXObject("Microsoft.XMLHTTP");
}
else
{
httpRequest = new XMLHttpRequest();
}
httpRequest.open("GET", "q2addwiki.html", true);
httpRequest.onreadystatechange= function () {processRequest(); } ;
httpRequest.send(null);
}
/**
* Event handler for the XMLhttprequest
* when the content is back (State 4 and status 200)
* take the content of the request and copy it into the HTML page
*/
function processRequest()
{
if (httpRequest.readyState == 4)
{
if(httpRequest.status == 200)
{
var contentViewer = document.getElementById("contentViewer");
contentViewer.innerHTML = httpRequest.responseText;
}
else
{
alert("Error loading page\n"+ httpRequest.status +":"+ httpRequest.statu
sText);
var contentViewer = document.getElementById("contentViewer");
contentViewer.innerHTML = "Error: can not get the content ("+ httpReques
t.statusText +")";
}
}
else
{
var contentViewer = document.getElementById("contentViewer");
contentViewer.innerHTML = "<b style='color:red;'>Loading....<b>";
}
}
END
print $q->start_html(-title =>'hello world',
-script =>$JSCRIPT);
print $q->button(-name=>'myButton',
-value=>'Click Me',
-onClick=>'process();');
print "<p>";
print "<div id= 'contentViewer'>";
print " </div>";
print" </p>";
$q->end_html; # end the HTML

复制代码

文库|博客

AndyFastow

稍有积蓄

论坛徽章:: 0

2楼 [报告]

发表于 2006-02-17 06:40 |只看该作者

html的程序

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252"></meta>
<title>XMLHttpRequest Demonstration 1</title>
<link type="text/css" rel="stylesheet" href="http://www.grallandco.com/blog/styles-site.css"/>
<script>
// global variable for the XMLHttpRequest object
var httpRequest;
/**
* process ...
*/
function process()
{
var contentViewer = document.getElementById("contentViewer");
contentViewer.innerHTML = "<b style='color:red;'>Loading....<b>";
if (window.ActiveXObject)
{
httpRequest = new ActiveXObject("Microsoft.XMLHTTP");
}
else
{
httpRequest = new XMLHttpRequest();
}
httpRequest.open("GET", "my0.html", true);
httpRequest.onreadystatechange= function () {processRequest(); } ;
httpRequest.send(null);
}
/**
* Event handler for the XMLhttprequest
* when the content is back (State 4 and status 200)
* take the content of the request and copy it into the HTML page
*/
function processRequest()
{
if (httpRequest.readyState == 4)
{
if(httpRequest.status == 200)
{
var contentViewer = document.getElementById("contentViewer");
contentViewer.innerHTML = httpRequest.responseText;
}
else
{
alert("Error loading page\n"+ httpRequest.status +":"+ httpRequest.statusText);
var contentViewer = document.getElementById("contentViewer");
contentViewer.innerHTML = "Error: can not get the content ("+ httpRequest.statusText +")";
}
}
else
{
var contentViewer = document.getElementById("contentViewer");
contentViewer.innerHTML = "<b style='color:red;'>Loading....<b>";
}
}
</script>
</head>
<body>
<button id="myButton" name="myButton" onClick="process();">
Add tasks
</button>
<p>
<div id="contentViewer">
</div>
</p>
</body>
</html>

复制代码

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

apile

富足长乐

论坛徽章:: 1

3楼 [报告]

发表于 2006-02-17 08:53 |只看该作者

用IE看左下角的「!」符号，点开看看什麽地方有error...

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

AndyFastow

稍有积蓄

论坛徽章:: 0

4楼 [报告]

发表于 2006-02-17 12:41 |只看该作者

o , 这个程序是运行在firefox下面的。

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

apile

富足长乐

论坛徽章:: 1

5楼 [报告]

发表于 2006-02-17 16:48 |只看该作者

一样啦..用IE才能对Javascript debug....firefox完全不会有任何Error..所以我都用IE来对Javascript debug

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

ulmer

家境小康

论坛徽章:: 0

6楼 [报告]

发表于 2006-02-17 18:44 |只看该作者

Hi,

the problem may be the access of request file:
httpRequest.open("GET", "q2addwiki.html", true);
_________________________^^^^^^^^^^^^^^______________

Usually under the cgi-bin as default configuration of Apache
is only allowed *.cgi file to access.
If you want to access other files, should reconfigure Apache to
make those files to worldwide accessable/readable.
If the access file is not in the same directoy such as cgi-bin,
should use absolute path to the file (http://pathto/q2addwiki.htm)

Best, ulmer