05-05-2003, 09:07 AM
|
|||
|
|||
sms script
this script only works for 012 and 019. you can see how it works at http://kebunpakwa.netfirms.com.
this script uses a part of MOJO mailing list script located at http://mojo.skazat.com. so, please install this script and make sure it is working before using the sms script. content of the perl file ( eg. sms.cgi ) which located in the same folder with mojo files: Code:
#!/usr/bin/perl -w
use CGI::Carp "fatalsToBrowser";
use lib './'; #look for the MOJO folder in the same directory as the script
use lib './MOJO';
$ENV{PATH} = "/bin:/usr/bin";
use MOJO::CONFIG;
use MOJO::GUTS;
use MOJO::HTML;
use CGI qw(:standard :html3);
use strict;
$|++;
my $q = new CGI;
my $flavor = $q->param('flavor');
$flavor = $q->param('f') unless($flavor);
my $smsaddress = $q->param('smsaddress');
my $nombor = $q->param('nombor');
my $operator = $q->param('operator');
my $nama = $q->param('nama');
my $mesej = $q->param('mesej');
my @inlines = ();
my %Mode = (
'default' => \&default, #user start page with all lists
'sms' => \&sms, #user send sms
);
if(exists($Mode{$flavor})) {
$Mode{$flavor}->(); #call the correct subroutine
}else{
&default
}
sub default {
print header();
print('default');
exit;
}
sub sms {
print(admin_html_header(
-Title => "SMS"
));
my ($sec, $min, $hour, $day, $month, $year) = (localtime)[0,1,2,3,4,5];
if ($operator eq "012") {$smsaddress = "6012".$nombor."\@sms.maxis.net.my"}
if ($operator eq "019") {$smsaddress = "019".$nombor."\@sms.celcom.com.my";}
$mesej = $mesej."free sms at http://www.yoursite.com";
require MOJO::MAIL;
my $mh = MOJO::MAIL -> new();
my %mailing = (
From => "\"$nama\"<$sec\@yoursite.com>",
'Return-Path' => "\"yoursite\"<$sec\@yoursite.com>",
'Errors-To' => "\"yoursite\"<$sec\@yoursite.com>",
'Content-Type' => "text/plain; charset=iso-8859-1",
List => "no list",
To => "$smsaddress",
Subject => "SMS dari $nama",
Body => "$mesej",
send_via_smtp => "0",
'Strip-Headers' => "0");
$mh -> send(%mailing);
print "sms sent";
print(admin_html_footer());
exit;
}
Code:
<html>
<head>
<title>SMS</title>
<SCRIPT language=JavaScript>
<!--
function countMsg(theForm) {
textMsg = theForm.mesej;
textCount = textMsg.value.length;
if (textCount > 120) {
textMsg.value = textMsg.value.substring(0,120);
textCount = 120;
}
theForm.char_count.value = textCount
}
//-->
</SCRIPT>
</head>
<body>
<FORM action=http://www.yoursite.com/cgi-bin/mojo/sms.cgi method=post>
<P>To: <SELECT name=operator size=1><OPTION selected
value=019>019</OPTION> <OPTION
value=012>012</OPTION></SELECT> <INPUT maxLength=8 name=nombor size=8>
<P>The SMS message:<BR><TEXTAREA cols=15 name=mesej onkeyup=countMsg(this.form) rows=6 wrap=virtual></TEXTAREA><BR><FONT
class=small size=-1>Total: <INPUT disabled name=char_count size=3 value=0>
chars. [Max:120]<BR><BR>Nama anda : <INPUT maxLength=8 name=nama size=8> <BR>
<font face=arial size=1>
<input type=hidden name=flavor value=sms>
<center>
<INPUT name=list type=hidden value=name_of_mojolist> <INPUT type=submit value=Submit> <INPUT type=reset value=Reset> </center> </FORM></font>
</body>
</html>
good luck.      
|
|
05-05-2003, 11:50 AM
|
||||
|
||||
|
Syabas zumaidi! and thank you for sharing out your SMS script.
|
|
25-04-2004, 07:06 PM
|
||||
|
||||
|
Hahaha.......susahnyer script ko! aku dah buat dah script aku sendiri dengan usaha aku mencari maklumat sebelum ni. Aku punya kod lagi ringkas!
Walau apapun syabas kerana berjaya buat!
|
|
30-04-2004, 05:17 PM
|
|||
|
|||
|
sepatutnya memang ringkas sebab ia macam buat formail. cuma, masa tu saya tak pandai nak setkan mail tersebut sebagai plain text.
anyway, boleh ke kongsi kod awak ? btw, tahu tak macam mana nak setkan email return path utk cpanel ?
|
|
13-05-2004, 01:58 AM
|
||||
|
||||
|
dah ade mail server ke kat localhost?
__________________
I hate when: vBulletin Message: Sorry! The administrator has specified that users can only post one message every 60 seconds
|
|
08-02-2006, 08:06 AM
|
||||
|
||||
|
It's sending it via email gateway?
|
|
25-06-2006, 09:33 PM
|
||||
|
||||
|
maner leh guna localhost!
For: vincevincevince It's send via normal email function. SMTP n sendmail
|
|
22-02-2007, 03:30 PM
|
|||
|
|||
|
Question
Hello,
May i know what to download from the page - mojo.skazat.com - then only the script can work? the *cgi file and sms.html file already ready. but i think less something so it comes out error. Thanks.
|
|
23-02-2007, 08:48 AM
|
|||
|
|||
|
as far as i know, sorry to say that celcom, maxis & digi are no longer offering sms service via 3rd party website. so, the script is no longer applicable. i have disabled sms utility at my kebunpakwa.netfirms.com for 2 years already.
|
 |
«
Previous Thread
|
Next Thread
»
| Currently Active Users Viewing This Thread: 1 (0 members and 1 guests) | |
| Thread Tools | Search this Thread |
| Display Modes | Rate This Thread |
Linear Mode
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| Looking for MLM Php script | masrule | Website Programming | 0 | 24-01-2007 01:56 PM |
| script | nurulmajdi | Website Programming | 12 | 16-02-2004 04:03 PM |
| Help Me With My First Php Script !!!! | mya | Website Programming | 17 | 24-01-2004 06:12 PM |
| my script can't run..why? | therion | Website Programming | 7 | 23-10-2003 05:14 PM |
| cgi script | Seman | Website Programming | 6 | 16-09-2003 05:46 PM |
All times are GMT +8. The time now is 03:22 AM.
Powered by vBulletin® Version 3.7.3
Copyright ©2000 - 2008, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO 3.1.0 vBulletin skin by ForumMonkeys.com.
Copyright ©2000 - 2008, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO 3.1.0 vBulletin skin by ForumMonkeys.com.
