Free Useful Codes For Your Website

1. Cory Right Protection Code

Copy this code and past into you source area, past it after closing html tag < /html >. Anyone cannot copy your content.

2. Animated Status Bar Code

Copy this code and past into your source area, past it after closing html tag < /html >. You will see some text which will animate on your status bar.

<!--
var speed = 50 // decrease value to increase speed (must be positive)
var pause = 2000 // increase value to increase pouse
var timerID = null
var bannerRunning = false
var ar = new Array()
ar[0] = "Welcome to www.pakistani-forum.page.tl" 
ar[1] = "Entertaining" 
ar[2] = "Informative)" 
ar[5] = "Eductional, Website Pakistani-forum.page.tl"

var currentMessage = 0
var offset = 0
function stopBanner() {
if(bannerRunning)
clearTimeout(timerID)
bannerRunning = false
}
function startBanner() {
stopBanner()
showBanner()
}
function showBanner() {
var text = ar[currentMessage]
if(offset <text.length) {
if(text.charAt(offset) == " ")
offset++
var partialMessage = text.substring(0, offset + 1)
window.status = partialMessage
offset++
timerID = setTimeout("showBanner()", speed)
bannerRunning = true
} else {
offset = 0
currentMessage++
if(currentMessage == ar.length)
currentMessage = 0
timerID = setTimeout("showBanner()", pause) 
bannerRunning = true
}
}
// -->
</script>

</head>
<body BGCOLOR="#FFFFFF" TEXT="#000000" LINK="#FF0000"
VLINK="#000080" ALINK="#000080"
onload="startBanner()">
</body>
</html>

3. Feedback Form Scrip [PHP]

<?php
if(isset($Submit))
//////////////////// email preparation
                $to="info@dotxperts.com";
                  // Generate a boundary string
            $emailcontent = "<table width=100% border=0 cellspacing=5 cellpadding=0>
 <tr> 
    <td width=31%>Date</td>
    <td width=69%> $date </td>
  </tr>
  <tr> 
    <td width=31%>Name</td>
    <td width=69%> $name </td>
  </tr>
  <tr> 
    <td width=31%>Address</td>
    <td width=69%> $address </td>
  </tr>
  <tr>
    <td width=31%>E-mail</td>
    <td width=69%> $email </td>
  </tr>
  <tr> 
    <td width=31%>Resident Phone</td>
    <td width=69%> $resident </td>
  </tr>
   <tr> 
    <td width=31%>Office Phone</td>
    <td width=69%> $office </td>
  </tr>
   <tr> 
    <td width=31%>Mobile</td>
    <td width=69%> $mobile </td>
  </tr>
   <tr> 
    <td width=31%>Fax</td>
    <td width=69%> $fax </td>
  </tr>
  <tr>
    <td width=31%>City</td>
    <td width=69%> $city </td>
  </tr>
  <tr>
    <td width=31%>Country</td>
    <td width=69%> $country </td>
  </tr>
   <tr> 
    <td width=31%>Query</td>
    <td width=69%> $query </td>
  </tr>
   <tr> 
    <td width=31%>Your Budget</td>
    <td width=69%> $demand </td>
  </tr>
  <tr> 
    <td width=31%>Last Amount</td>
    <td width=69%> $last </td>
  </tr>
    <tr>
    <td width=31%>Remarks</td>
    <td height=22 width=69%> $query </td>
  </tr>
</table>
";
            $headers = "From: $email";
            $subject = "Email from site";

$semi_rand = md5(time());
          $mime_boundary = "==Multipart_Boundary_x{$semi_rand}x";

$headers .= "nMIME-Version: 1.0n" .
              "Content-Type: multipart/alternative;n" .
              " boundary="{$mime_boundary}"";

// Add a multipart boundary above the plain message
          $message = "This is a multi-part message in MIME format.nn" .
             "--{$mime_boundary}n" .
             "Content-Type: text/html; charset="iso-8859-1"n" .
             "Content-Transfer-Encoding: 7bitnn" .
             $emailcontent . "nn";

$message .= "--{$mime_boundary}--n";
        // Send the message

$ok = mail($to, $subject, $message, $headers);
        if ($ok) {
header("Location: thanx.html");
        } else {
          echo "<font name='Arial' size='2'><b>Mail could not be sent. Use your browser back button and fill the form again.</b></font><br><br>";
        }                
//print "$to <br> $emailsubject <br> $emailcontent ";
///////////////////// end of email prep
                unset($Submit);