Just a crude merging of the PHP7 code base with the PHP8.4 version

1 files changed, 39 insertions, 0 deletions

diff --git a/load_contacts.php b/load_contacts.php
new file mode 100755
index 0000000..610ace5
--- /dev/null
+++ b/load_contacts.php
@@ -0,0 +1,39 @@
+<?php
+/*
+ * Created on 5 Jan 2008
+ *
+ * To change the template for this generated file go to
+ * Window - Preferences - PHPeclipse - PHP - Code Templates
+ */
+
+// Initialization
+require_once '../kernel/includes/setup_inc.php';
+use Bitweaver\Contact\Contact;
+use Bitweaver\KernelTools;
+
+// Is package installed and enabled
+$gBitSystem->verifyPackage( 'contact' );
+
+// Now check permissions to access this page
+$gBitSystem->verifyPermission('p_contact_admin' );
+
+$contact = new Contact();
+
+// $contact->DataExpunge();
+
+$row = 0;
+
+$handle = fopen("data/cotswold_guard_cust.csv", "r");
+if ( $handle == FALSE) {
+	$row = -999;
+} else {
+	while (($data = fgetcsv($handle, 800, ",")) !== FALSE) {
+		if ( $data ) { $contact->ContactRecordLoad( $data );
+		$row++; }
+	}
+	fclose($handle);
+}
+
+$gBitSmarty->assign( 'count', $row );
+
+$gBitSystem->display( 'bitpackage:contact/load_contacts.tpl', KernelTools::tra( 'Load results: ' ) );