Try it out: Base64 Converter

Bookmark this page

Web Sniffer

To be totally honest, I’ll probably end up creating my own site for this because I like to build things out for the fun of it.

Bookmark this page

Also, if you're like me and constantly need to check your IP address and don't want to always search google for "whats is my ip", I'd recommend you bookmark whats my info, a simple, non-bloated site that gives you what just you're looking for.

Bookmark this page

I’m just sharing a couple of functions I created a while back to cache some resource-intensive processed dada for quick and easy access. This is pretty ideal for large amounts of data and it’s very simple to set up. The beauty of this is that you can store just about any data type – it doesn’t have to be a string.

Just setup the cache directory to have proper read/write permissions (preferably in a non-accessible from web directory). Then use the two functions.

Example usage:

1
2
3
4
5
6
7
8
9

// The 2nd argument, $hours is how long to retain data before getting new
$contents = get_cache('TEST_KEY', 24);
if ($contents === false) {
	// This is where you'd get data from an API, DB or whatever
	$contents = 'Just some example contents';
	set_cache('TEST_KEY', $contents);
}
echo $contents;
}

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13

define('CACHE_DIR', 'cache/'); // Include trailing slash
 
function get_cache($key, $hours) {
	$file = CACHE_DIR . md5($key) . '.cache';
	if (!file_exists($file) || filemtime($file) < time() - $hours * 3600)
		return false;
	return unserialize(file_get_contents($file));
}
 
function set_cache($key, $value) {
	$file = CACHE_DIR . md5($key) . '.cache';
	file_put_contents($file, serialize($value));
}

Bookmark this page

<%
Function File_Get_Contents(strFile)
	' Remote File
	If Left(strFile, 7) = "http://" Or Left(strFile, 8) = "https://" Then
		Set objXML = Server.CreateObject("Microsoft.XMLHTTP")
		' Use this line if above errors
		'Set objXML = Server.CreateObject("MSXML2.ServerXMLHTTP")
		objXML.Open "GET", strFile, False
		objXML.Send()
		File_Get_Contents = objXML.ResponseText()
		Set objXML = Nothing
	' Local File
	Else
		Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
		Set objFile = objFSO.OpenTextFile(strFile, 1)
		File_Get_Contents = objFile.ReadAll()
		Set objFile = Nothing
		Set objFSO = Nothing
	End If
End Function

Function File_Put_Contents(strFile, strContents, blnAppend)
	If blnAppend Then
		intMode = 8
	Else
		intMode = 2
	End If
	Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
	Set objFile = objFSO.OpenTextFile(strFile, intMode, True)
	objFile.Write(strContents)
	Set objFile = Nothing
	Set objFSO = Nothing
End Function
%>

Of course this file_get_contents doesn't support remote URLs, but it can easily be added.

EDIT: I just added remote URL support.

Bookmark this page

The following is a list of random web tools I use nearly on a day-to-day basis in no particular order.

• Estibot
  • This is a nice tool for evaluating the potential value of a domain. It uses several techniques including keyword value and frequency, domain length, TLD (top-level-domain) value, domain registration length, Google PageRank, etc. to produce a handy (generally somewhat realistic) domain valuation. Keep in mind that a domain or site is always worth what someone is willing to pay for it, so make sure you do far more research than just this.
• DNScoop
  • This tool is very similar to estibot, except that it uses a slightly different algorithm to determine the valuation and has a slightly nicer interface, though Estibot is faster.
• Nameboy
  • Again, this tool is similar to the other two. I would use it more, but it delivers the results via email which sometimes can take a while and be a pain. Oh well, it’s still free!
• Dope Domains
  • This site has a very simple idea to it. It automatically spiders sites like TDNAM (GoDaddy’s domain after-market) and Sedo for the latest and greatest expiring domains. The filters are nice so that you are able to spot out domains you’re interested in by TLD and/or categories like domains with traffic, short domains, dictionary domains, etc.
• DigitalPoint Forums
  • This site is a very large, active community with a small proportion of helpful people. They will give you their insight on the good, the bad, and the ugly of your domains and sites (sometimes whether you want it or not). It’s also a good place to buy and sell domains, sites, and services.
• NamePros Forums
  • This site is very similar to DP (DigitalPoint). I have lost interest in it because it seems to be less active and people seem less helpful.

Bookmark this page

The script is very simple. I just basically created a format for logging the time you work in a text file, so that you can copy and paste in your “time card” and it will spit out your total time worked. The script could easily be modified to your liking. I threw up an example here. I originally wrote the script and also ported it to PHP.

Enter the times in the following format, separated by new lines or whatever. Whitespace does not matter. The number in the parenthesis is what counts. That’s the total hours:minutes worked during that period of work. The script could be improved by just counting up from the times themselves, but there are lots of problems that could run into unless you included dates, and for personal reasons, I chose not to do that. Don’t forget to change the hourly_rate variable if you want it to tell you how much you get owed.

1:27 PM - 2:08 PM		(0:41)
12:09 AM - 1:12 AM		(1:03)

Demo: http://www.randomtools.net/scripts/times.php

HTML form:

1
2
3
4

<p>Enter the times, separated by new lines or whatever. Whitespace does not matter.</p>
<form method="post" action="">
	<textarea name="times" style="width: 300px; height: 200px;"></textarea><br /><button type="submit">Go</button>
</form>

PHP source code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33

<?php
$hourly_rate = 30; // Change this to your wage
if ($_SERVER['REQUEST_METHOD'] == 'POST') {
	$arr = array();
	$x = 0;
	$str = $_POST['times'];
	$pos = strpos($str, '(');
	while ($pos > 0) {
		$pos2 = strpos($str, ')');
		$arr[$x] = substr($str, $pos + 1, $pos2 - $pos - 1);
		$str = substr($str, $pos2 + 2, strlen($str));
		$pos = strpos($str, '(');
		$x++;
	}
 
	$hours = 0;
	$minutes = 0;
 
	for ($x = 0; $x < count($arr); $x++) {
		$arr2 = explode(':', $arr[$x]);
		$minutes += $arr2[1];
		if ($minutes >= 60) {
			$hours = $hours + 1;
			$minutes -= 60;
		}
		$hours += $arr2[0];
	}
 
	$total = $hours * 15 + $minutes / 60 * 15;
 
	echo "<p>Worked <b>$hours hours</b> and <b>$minutes minutes</b> (" . number_format($hours + $minutes / 60, 2, '.', '') . ")<br />That's $" . number_format(($hours + $minutes / 60) * $hourly_rate, 2, '.', '') . "</p>";
}
?>

ASP source code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37

<%
hourly_rate = 30 'Change this to your wage
If Request.ServerVariables("REQUEST_METHOD") = "POST" Then
	ReDim arr(0)
	x = 0
	str = Request("times")
	pos = InStr(str, "(")
	While pos > 0
		ReDim Preserve arr(x)
		pos2 = InStr(str, ")")
		arr(x) = Mid(str, pos + 1, pos2 - pos - 1)
		str = Mid(str, pos2 + 2, Len(str))
		pos = InStr(str, "(")
		x = x + 1
	Wend
 
	hours = 0
	minutes = 0
 
	For x = 0 To UBound(arr)
		arr2 = Split(arr(x), ":")
 
		minutes = minutes + CInt(arr2(1))
 
		If minutes >= 60 Then
			hours = hours + 1
			minutes = minutes - 60
		End If
 
		hours = hours + CInt(arr2(0))
	Next
 
	total = hours * 15 + minutes / 60 * 15
 
	Response.Write("<p>Worked <b>" & hours & " hours</b> and <b>" & minutes & " minutes</b> (" & FormatNumber(hours + minutes / 60, 2) & ")<br />That's " & FormatCurrency((hours + minutes / 60), 2) & "</p>")
End If
%>

Bookmark this page