Har försökt konvenera det här php skriptet på
http://www.me-u.com/php-asp/
Kod:
<?
$open = fsockopen("******","****");
if ($open) {
fputs($open,"GET /7.html HTTP/1.1\nUser-Agent:Mozilla\n\n");
$read = fread($open,1000);
$text = explode("content-type:text/html",$read);
$text = explode(",",$text[1]);
}
echo "$text[6]";
?>
Då ser det ut så här..
Kod:
<%
Dim gv_open, gv_read, gv_text
gv_open = fsockopen("******","****")
If gv_open then
fputs(gv_open,"GET /7.html HTTP/1.1\nUser-Agent:Mozilla\n\n");
gv_read =fread(gv_open,1000);
gv_text =split ( gv_read , "content-type:text/html" )
$text = split ( $text[1] , "," )
End If
Response.Write "" & text[6] & ""
%>
men det blir ett felmeddelande
Kod:
Microsoft VBScript compilation error '800a0414'
Cannot use parentheses when calling a Sub
/vb/webbrowser/jappa.asp, line 8
fputs(gv_open,"GET /7.html HTTP/1.1\nUser-Agent:Mozilla\n\n")
-------------------------------------------------------------^
Någon som har något förslag? :blink: