[MySlowQuietLife]

Hello all im atsižvelgdama su kriaušės Mail.php problema

im gaunate šį klaidos pranešimą

Lemtinga klaida: Klasė "Mail" nerasta \ PEAR \ Mail.php eilutėje 26

Čia yra mano kodas

[php]
<? php
/ / Nuoroda Paštas PEAR library
require_once 'Mail.php';
/ / Main klasė, naudojamas siekiant gauti informacijos,
/ / Run vamzdyno sekcijų, audito užsakymus ir tt
klasė OrderProcessor
(
public $ mOrderId;
public $ mOrderStatus;
public $ mConnection;
public $ mConfiguration;
public $ mContinueNow;
privatus $ mCurrentCustomer;
privatus $ mCurrentOrderDetails;
privatus $ mOrderManager;
privatus $ mReference;
privatus $ mAuthCode;
/ / Konstruktorius sukuria DoOrderManager instancijos
funkcija __construct ()
(
$ this-> mOrderManager = nauji DoOrderManager ();
)
/ / Procesas vadinamas nuo checkout.php ir orders_admin.php tvarkyti
/ / Užsakymą; pirmasis parametras yra, kad ID ir antra
/ / Parametro OrderProcessorConfiguration instancijoje.
public function procesas ($ newOrderId, $ newConfiguration)
(
/ / Nustatyti Kad ID
$ this-> mOrderId = $ newOrderId;
/ / Configure procesorius
$ this-> mConfiguration = $ newConfiguration;
$ this-> mContinueNow = true;
/ / Prisijungti pradėti vykdymo
$ this-> AddAudit ( "Užsakymo procesorius pradėtas.", 10000);
/ / Gauti statusą, kad
$ this-> mOrderStatus = $ this-> mOrderManager-> GetOrderStatus ($ this-> mOrderId);
/ / Proceso vamzdynų skirsnis
bandyti
(
while ($ this-> mContinueNow)
(
$ this-> mContinueNow = false;
$ cps = $ this-> GetCurrentPipelineSection ();
$ cps-> Process ($ this);
)
)
catch (Exception $ e)
(
trigger_error ( "Exception". "$ e-> getMessage ()". "Įtraukti".
$ e-> getFile (). "Linija". $ e-> getLine ());
$ this-> MailAdmin ( "Užsakymo Apdorojimo klaidos ocured.", $ e-> getMessage ());
$ this-> AddAudit ( "Užsakymo Apdorojimo klaidos ocured.", 10002);
throw new Exception ( "procesorius klaida");
)
$ this-> AddAudit ( "Užsakymo Procesorius baigtas.", 10001);
)
/ / Pasireiškia objektas Pavyzdžiui, atstovaujantys dabartinių dujotiekių skirsnis
privatus funkcija GetCurrentPipelineSection ()
(
switch ($ this-> mOrderStatus)
(
case 0:
$ this-> mCurrentPipelineSection = nauji PsInitialNotification (); break;
1 atvejis:
$ this-> mCurrentPipelineSection = nauji PsCheckFunds (); break;
2 atveju:
$ this-> mCurrentPipelineSection = nauji PsCheckStock (); break;
3 atvejis:
$ this-> mCurrentPipelineSection = nauji PsStockOk (); break;
case 4:
$ this-> mCurrentPipelineSection = nauji PsTakePayment (); break;
case 5:
$ this-> mCurrentPipelineSection = nauji PsShipGoods (); break;
case 6:
$ this-> mCurrentPipelineSection = nauji PsShipOK (); break;
Case 7:
$ this-> mCurrentPipelineSection = nauji PsFinalNotification (); break;
Case 8:
throw new Exception ( "Eilės jau buvo baigta.") break;
default:
throw new Exception ( "Nežinomas vamzdyno skyrių prašoma.");
)
)
/ / Siunčia elektroniniu paštu
public function paštas ($ params, $ to, $ headers, $ message)
(
/ / Sukuriamas objektas paštu naudojant Mail:: factory metodu
$ mail_object = Mail:: factory ( 'smtp', $ params);
/ / Bandymų paštas objektas yra svarbių
if (PEAR:: ISERROR ($ mail_object))
throw new Exception ($ mail_object-> getMessage ());
/ / Siunčia elektroniniu paštu
$ result = $ mail_object-> send ($ to, $ headers, $ message);
/ / Tekstas, jei pašto sėkmingai išsiųsta
if (PEAR:: ISERROR ($ result))
throw new Exception ( "Nepavyko išsiųsti e-mail $ iki..
$ result-> getMessage ());
)
/ / Sukuria laišką
public function MailAdmin ($ subject, $ message)
(
/ / Dažniausiai Jums neleidžiama nustatyti "From 'header
$ headers [ 'From'] = $ this-> mConfiguration-> mOrderProcessorEmail;
$ headers [ 'Tema'] = $ tema;
$ headers [ 'Į'] = $ this-> mConfiguration-> mAdminEmail;
$ this-> mail ($ this-> mConfiguration-> mOrderProcessorEmailParams,
$ this-> mConfiguration-> mAdminEmail,
$ headers,
$ message);
)
/ / Gauna klientas, kad padaryta siekiant
public function GetCurrentCustomer ()
(
if (empty ($ this-> mCurrentCustomer))
(
$ this-> mCurrentCustomer = naujas
Klientų ($ this-> mOrderManager-> GetCustomerByOrderId ($ this-> mOrderId));
if (empty ($ this-> mCurrentCustomer))
throw new Exception ($ this-> mOrderId. ", kad neturi
Klientas ");
)
return $ this-> mCurrentCustomer;
)
/ / Gauna iš dabartinių detalių
public function GetCurrentOrderDetails ()
(
if (empty ($ this-> mCurrentOrderDetails))
(
$ this-> mCurrentOrderDetails = naujas
OrderDetails ($ this-> mOrderManager-> GetOrderDetails ($ this-> mOrderId));
if (empty ($ this-> mCurrentOrderDetails))
throw new Exception ($ this-> mOrderId.
"Nėra užsakymo įrašas");
)
return $ this-> mCurrentOrderDetails;
)
/ / Prideda audito žinutę
public function AddAudit ($ message, $ messageNumber)
(
$ this-> mOrderManager-> AddAudit ($ this-> mOrderId, $ message, $ messageNumber);
)
/ / Atnaujinimai pavedimo statusą
public function UpdateOrderStatus ($ newStatus)
(
$ this-> mOrderManager-> UpdateOrderStatus ($ this-> mOrderId, $ newStatus);
$ this-> mOrderStatus = $ newStatus;
)
/ / Nustatyti, kad autorizacijos kodą ir nuoroda kodas
public function SetOrderAuthCodeAndReference ($ newAuthCode, $ newReference)
(
$ this-> mOrderManager-> SetOrderAuthCodeAndReference ($ this-> mOrderId,
$ newAuthCode,
$ newReference);
$ this-> mAuthCode = $ newAuthCode;
$ this-> mReference = $ newReference;
)

/ / Kad gauna autorizacijos kodą ir nuoroda kodas
privatus funkcija GetOrderAuthCodeAndReference ()
(
$ result = $ this-> mOrderManager-> GetOrderAuthCodeAndReference (
$ this-> mOrderId);
if (empty ($ result)) throw Exception ($ this-> mOrderId. "neegzistuoja");
$ this-> mAuthCode = $ result [ 'auth_code'];
$ this-> mReference = $ result [ 'reference'];
)
/ / Pasireiškia siekiant leidimo kodas
public function GetAuthCode ()
(
if (empty ($ this-> mAuthCode)) $ this-> GetOrderAuthCodeAndReference ();
return $ this-> mAuthCode;
)
/ / Pasireiškia siekiant nuoroda kodas
public function GetReference ()
(
if (empty ($ this-> mReference)) $ this-> GetOrderAuthCodeAndReference ();
return $ this-> mReference;
)
/ / Set užsakymo laivą data
public function SetDateShipped ()
(
$ this-> mOrderManager-> SetDateShipped ($ this-> mOrderId);
)
)

?>
[/ php]

Padėkite kas nors tai bus labai vertinama. vyksta rūšies proto.

Dėkojame

[vietoje]

Ar tai Gauk išspręsti?

http://www.geeklog.net/forum/viewtop...howtopic=75900 aptaria ji. Aš ne naudojasi Kriaušių modulius pagal "Windows taip bando jį yra geriausias būdas judėti pirmyn.