opendoug

Public Function quote(sString As String) As String
    quote = Chr(34) + sString + Chr(34)
End Function

Public Function URLEncode(sString As String) As String
  Dim iLen As Integer
  iLen = Len(sString)

  If iLen > 0 Then
    ReDim sResult(iLen) As String

opendoug

function shuffle() {
  
  // Shuffle the array
  var array = [['Doug'], ['Christina'], ['Afton'], ['Quinnlyn']];
  var currentIndex = array.length, temporaryValue, randomIndex;

  // While there remain elements to shuffle...
  while (0 !== currentIndex) {

    // Pick a remaining element...