agbishara

<?php
$key="enter your key";
function run($command,$key) {
	$ch = curl_init();
	$timeout = 5;
	$url='http://maker.ifttt.com/trigger/'.$command.'/with/key/'.$key;
	//echo $url;
	curl_setopt($ch, CURLOPT_URL,$url );
	curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
	curl_setopt($ch, CURLOPT_CONNECTTIMEOUT, $timeout);

agbishara

Option Explicit

Public Function JoinText(cells As Variant,Optional delim_str As String) As String
    If cells.Columns.count < cells.Rows.count Then
       JoinText = Join(WorksheetFunction.Transpose(cells), delim_str)
    Else
       JoinText = Join(WorksheetFunction.Transpose(WorksheetFunction.Transpose(cells)), delim_str)
    End If
End Function

agbishara

create a .user.ini file at your Joomla! root.
Add this content to the file and save
magic_quotes_gpc = Off

src = https://docs.joomla.org/How_to_turn_off_magic_quotes_gpc_for_Joomla_3

agbishara

http://jsperf.com/asdffafaal/2

// Define a class like this
function Person(name, gender){

   // Add object properties like this
   this.name = name;
   this.gender = gender;
}

agbishara

<?php
 /*
 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
THE SOFTWARE.
 */

agbishara

<?php
//src: http://stackoverflow.com/questions/10334753/how-to-send-an-email-with-a-csv-attachment-from-a-string  
//mysql user variables
 $mysqli = new mysqli("localhost", "user", "password", "database");

/* check connection */
if (mysqli_connect_errno()) {
    printf("Connect failed: %s\n", mysqli_connect_error());
    exit();
}

agbishara

#joomla 3 magic quotes fix
<IfModule mod_gzip.c>
    mod_gzip_on       Yes
    mod_gzip_dechunk  Yes
    mod_gzip_item_include file      \.(html?|txt|css|js|php|pl)$
    mod_gzip_item_include handler   ^cgi-script$
    mod_gzip_item_include mime      ^text/.*
    mod_gzip_item_include mime      ^application/x-javascript.*
    mod_gzip_item_exclude mime      ^image/.*
    mod_gzip_item_exclude rspheader ^Content-Encoding:.*gzip.*

agbishara

Function CreateWorkbook(Path As String) As Workbook
  Dim Tempbook As Workbook
  Set Tempbook = Workbooks.Add(ThisWorkbook.Path & "\template.xlsx")
  Application.DisplayAlerts = False
  Tempbook.SaveAs Filename:=Path
  Application.DisplayAlerts = True
  Set CreateWorkbook = Tempbook
End Function

agbishara

Application.DisplayAlerts = False
Tempbook.Save
Application.DisplayAlerts = True
Tempbook.Close

agbishara

Mainbook.Sheets(4).Range("E2:k5000").SpecialCells(xlCellTypeVisible).Copy
Sheet.Range(TMPCellAddress).PasteSpecial xlPasteValues