Avatar billede Boddicker Seniormester
28. juni 1999 - 13:25 Der er 20 kommentarer og
1 løsning

sms-script

Jeg har brug for et sms-sende-besked script. Det SKAL være perl. Hverken php eller asp kan bruges. Desuden skal helst kunne bruges uden brug af sendmail-programmet. Altså smtp ville være at foretrække. Dog ikke et must!

Og nope... jeg kan ikke bare bruge mobilbesked.dk eller lignende services. Jeg vil have en bannerfri løsning! :)

Avatar billede power Nybegynder
28. juni 1999 - 13:47 #1
Her er et Script ?? Håber det er nok ..

MVH hansen@mail.dk

<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=windows-1252">
<META NAME="Generator" CONTENT="Microsoft Word 97">
<TITLE>Send SMS Besked</TITLE>
<META NAME="Version" CONTENT="8.0.3612">
<META NAME="Date" CONTENT="1/8/97">
<META NAME="Template" CONTENT="C:\Programmer\Microsoft Office\Office\HTML.DOT">
<script  LANGUAGE="javascript"><!--
    maxChars = 131;
   
    function CheckLength() {
//        addLen = document.sms.Navn.value.length;
//        mesLength = document.sms.Message.value.length+addLen;
//        document.sms.mesStatus.value = "Beskeden indeholder "+String(mesLength)+" tegn fordelt over "+String(Math.round(mesLength / maxChars + 0.5))+" beskeder";
//        if ( mesLength > 700) {
//            self.window.alert( "Der kan ikke sendes SMS beskeder der indeholder mere end 700 tegn..." );
//            document.sms.Message.value = document.sms.Message.value.substr(0,699-addLen);
//        }
    }
   
    function SendSMS() {
        if (document.sms.Message.value.length < 2)
            self.window.alert( "Du mangler at indtaste en besked" );
        else if (document.sms.Navn.value.length < 2)
            self.window.alert( "Du mangler at indtaste dit navn" );
//        else if (document.sms.Phone.value.length < 5)
//            self.window.alert( "Du mangler at indtaste et tlf. nummer" );
        else
            document.sms.submit()
    }
   
   
//--></script ></HEAD>
<BODY TEXT="#000000" LINK="#ffffff" VLINK="#ffffff" BGCOLOR="#ffffff" OnLoad="CheckLength();" ALINK='#FFFFFF'>

<P ALIGN="CENTER"><CENTER><TABLE CELLSPACING=0 BORDER=0>
<TR><TD VALIGN="MIDDLE" BGCOLOR="#000080">
<P><FONT FACE="Verdana,arial" SIZE=1 COLOR="#ffffff">Dit&nbsp;navn:<BR>

<INPUT TYPE="text" NAME="Navn">
</FONT></TD>
</TR>
<TR><TD VALIGN="MIDDLE" BGCOLOR="#000080">
<FONT FACE="Verdana,arial" SIZE=1 COLOR="#ffffff"><P>Modtager&nbsp;telefon: </FONT><BR>

<INPUT TYPE="text" NAME="Phone">
</TD>
</TR>
<TR><TD VALIGN="MIDDLE" BGCOLOR="#000080">
<FONT FACE="Verdana,arial" SIZE=1 COLOR="#ffffff"><P>Standardbesked:</FONT><BR>
         
<SELECT NAME="Standard">
<OPTION SELECTED VALUE="">- Du kan v&aelig;lge en standardbesked her -
<OPTION VALUE="Jeg elsker dig!">Jeg elsker dig!
<OPTION VALUE="Tillykke med f&oslash;dselsdagen!">Tillykke med f&oslash;dselsdagen!
<OPTION VALUE="Tak for sidst">Tak for sidst
<OPTION VALUE="Jeg kan ikke komme alligevel">Jeg kan ikke komme alligevel
<OPTION VALUE="Jeg savner dig">Jeg savner dig
<OPTION VALUE="Ring til mig">Ring til mig
<OPTION VALUE="Ring til mig p&aring; nr.">Ring til mig p&aring; nr.
<OPTION VALUE="Tjek din e-mail">Tjek din e-mail
<OPTION VALUE="Jeg har sendt dig en e-mail">Jeg har sendt dig en e-mail
<OPTION VALUE="Skal vi m&oslash;des ?">Skal vi m&oslash;des ?
</SELECT>
</TD>
</TR>
<TR><TD VALIGN="TOP" BGCOLOR="#000080">
<FONT FACE="Verdana,arial" SIZE=1 COLOR="#ffffff"><P>Besked:</FONT><BR>

<TEXTAREA ROWS="5" COLS="40" NAME="Message"></TEXTAREA>
<BR>

<INPUT TYPE="TEXT" NAME="mesStatus">
<BR>
</TD>
</TR>
</TABLE>
</CENTER></P>

<P ALIGN="CENTER"><A HREF="java script: SendSMS();">Send SMS</A> </P></BODY>
</HTML>
Avatar billede graae Nybegynder
28. juni 1999 - 13:56 #2
Det der kommer han da ikke langt med...
...Hvad jeg kan se er der sq da ingen "send besked"-knap!
Avatar billede graae Nybegynder
28. juni 1999 - 14:13 #3
Prøv istedet det her, det kan dog godt være at det ikke er helt lovligt, men..
...det kan bruges!

<html>

<head>
<title>www.telefonbesked.dk</title>
</head>

<body background="back.jpg">

<p align="center">&nbsp;</p>

<p align="center"><font color="#000000">&nbsp; </font></p>

<dl>
  <script> 
    function sendmessage(dataform){
        nummer=dataform.number.value
        udbyder=0
        if(nummer >= 20100000&& nummer <= 20599999) udbyder="@sms.tdm.dk";
        if(nummer >= 20600000&& nummer <= 20999999) udbyder="@note.sonofon.dk";
        if(nummer >= 21200000&& nummer <= 21999999) udbyder="@sms.tdm.dk";
        if(nummer >= 22100000&& nummer <= 22999999) udbyder="@note.sonofon.dk";
        if(nummer >= 23200000&& nummer <= 23499999) udbyder="@sms.tdm.dk";
        if(nummer >= 26100000&& nummer <= 26999999) udbyder="@sms.mobilix.dk";
        if(nummer >= 28100000&& nummer <= 28999999) udbyder="@sms.mobilix.dk";
        if(nummer >= 30000000&& nummer <= 30999999) udbyder=5;
        if(nummer >= 40100000&& nummer <= 40499999) udbyder="@sms.tdm.dk";
        if(nummer >= 40500000&& nummer <= 40999999) udbyder="@note.sonofon.dk";
        if(udbyder==0)
        {
            alert("Du har ikke indtastet et gyldigt mobilnummer. Prøv igen.");
            return;
        }
        if(udbyder==5)
        {
            alert("Du har indtastet et nummer på en NMT telefon. Det er desværre ikke muligt at sende beskeder til den type telefoner.");
            return;
        }
        var item=dataform.besked.value
        var words=item.split(" ");
        var j=0
        besk=words[j]+"+"
        for (j=1; j< words.length; j++) {
                besk=besk+words[j]+"+"
            } // end for j
        adresse=nummer+udbyder
        mailcommand="http://www.holtze.dk/cgi_bin/formmail.pl?recipient="+adresse+"&sender="+dataform.sender.value+"&subject="+besk+"&redirect=http://www.telefonbesked.dk"
        location=mailcommand
        alert("Beskeden er sendt.")
    }
</script>
<div align="center"><center><table BORDER="0" ALIGN="Center" VALIGN="top">
    <tr>
      <td width="250" VALIGN="TOP" align="center"><form name="skema" method="POST"
      action="java script:sendmessage(document.skema)">
        <font face="Arial" size="2"><p></font><font color="#000000" face="Arial" size="2"><br>
        </font><font color="#000000"><font face="Arial" size="1">Nummeret beskeden skal sendes
        til:<br>
        <input type="text" name="number" value size="15"> </font><br>
        <font face="Arial" size="1">Dit navn, dit nummer, eller din e-mail: <input type="text"
        name="sender" value size="15"> </font><br>
        <font face="Arial" size="1">Her skrives Besked:</font><font face="Arial" size="2"> </font><input
        type="text" name="besked" size="35"></font></p>
        <p><font color="#000000"><input type="submit" name="send" value="Send besked"> </font></p>
      </form>
      <p><font color="#000000"><br>
      </font></td>
    </tr>
  </table>
  </center></div>
  <dd><p align="center"><font color="#000000"><br>
    </font></p>
  </dd>
</dl>
<!Klik på ovenstående banner for at fortsætte din surftur. God fornøjelse!>

<p align="center"><br>
</p>

<p align="center"><!-- Start of TheCounter.com Code --> <script><!--
s="na";c="na";j="na";f=""+escape(document.referrer)
//--></script> <script language="javascript1.2"><!--
s=screen.width;v=navigator.appName
if (v != "Netscape") {c=screen.colorDepth}
else {c=screen.pixelDepth}
j=navigator.javaEnabled()
//--></script> <script><!--
function pr(n) {document.write(n,"\n");}
NS2Ch=0
if (navigator.appName == "Netscape" &&
navigator.appVersion.charAt(0) == "2") {NS2Ch=1}
if (NS2Ch == 0) {
r="&size="+s+"&colors="+c+"&referer="+f+"&java="+j+""
pr("<A HREF=\"http://www.TheCounter.com\" TARGET=\"_top\"><IMG")
pr("BORDER=0 SRC=\"http://c1.thecounter.com/id=200213"+r+"\"></A>")}
//--></script>
<NOSCRIPT>
</p>
</body>
</html>
Avatar billede graae Nybegynder
28. juni 1999 - 14:16 #4
Ups...Der var lige nogle småting, jeg prøver igen!:

<html>

<head>
<title></title>
</head>

<body>

<p>&nbsp;</p>

<p align="center">&nbsp;</p>

<p align="center"><font color="#000000">&nbsp; </font></p>

<dl>
  <script> 
    function sendmessage(dataform){
        nummer=dataform.number.value
        udbyder=0
        if(nummer >= 20100000&& nummer <= 20599999) udbyder="@sms.tdm.dk";
        if(nummer >= 20600000&& nummer <= 20999999) udbyder="@note.sonofon.dk";
        if(nummer >= 21200000&& nummer <= 21999999) udbyder="@sms.tdm.dk";
        if(nummer >= 22100000&& nummer <= 22999999) udbyder="@note.sonofon.dk";
        if(nummer >= 23200000&& nummer <= 23499999) udbyder="@sms.tdm.dk";
        if(nummer >= 26100000&& nummer <= 26999999) udbyder="@sms.mobilix.dk";
        if(nummer >= 28100000&& nummer <= 28999999) udbyder="@sms.mobilix.dk";
        if(nummer >= 30000000&& nummer <= 30999999) udbyder=5;
        if(nummer >= 40100000&& nummer <= 40499999) udbyder="@sms.tdm.dk";
        if(nummer >= 40500000&& nummer <= 40999999) udbyder="@note.sonofon.dk";
        if(udbyder==0)
        {
            alert("Du har ikke indtastet et gyldigt mobilnummer. Prøv igen.");
            return;
        }
        if(udbyder==5)
        {
            alert("Du har indtastet et nummer på en NMT telefon. Det er desværre ikke muligt at sende beskeder til den type telefoner.");
            return;
        }
        var item=dataform.besked.value
        var words=item.split(" ");
        var j=0
        besk=words[j]+"+"
        for (j=1; j< words.length; j++) {
                besk=besk+words[j]+"+"
            } // end for j
        adresse=nummer+udbyder
        mailcommand="http://www.holtze.dk/cgi_bin/formmail.pl?recipient="+adresse+"&sender="+dataform.sender.value+"&subject="+besk+"&redirect=http://www.eksperten.dk"
        location=mailcommand
        alert("Beskeden er sendt.")
    }
</script>
<div align="center"><center><table BORDER="0" ALIGN="Center" VALIGN="top">
    <tr>
      <td width="250" VALIGN="TOP" align="center"><form name="skema" method="POST"
      action="java script:sendmessage(document.skema)">
        <font face="Arial" size="2"><p></font><font color="#000000" face="Arial" size="2"><br>
        </font><font color="#000000"><font face="Arial" size="1">Nummeret beskeden skal sendes
        til:<br>
        <input type="text" name="number" value size="15"> </font><br>
        <font face="Arial" size="1">Dit navn, dit nummer, eller din e-mail: <input type="text"
        name="sender" value size="15"> </font><br>
        <font face="Arial" size="1">Her skrives Besked:</font><font face="Arial" size="2"> </font><input
        type="text" name="besked" size="35"></font></p>
        <p><font color="#000000"><input type="submit" name="send" value="Send besked"> </font></p>
      </form>
      <p><font color="#000000"><br>
      </font></td>
    </tr>
  </table>
  </center></div>
  <dd><p align="center"><font color="#000000"><br>
    </font></p>
  </dd>
</dl>

<p align="center"><br>
</p>
</body>
</html>
Avatar billede Boddicker Seniormester
28. juni 1999 - 14:34 #5
well... ingen af svarene er jo i perl - og det har jeg brug for...

Derfor: ingen ASP, PHP eller java.

Kun ren perl....
Avatar billede Boddicker Seniormester
28. juni 1999 - 15:44 #6
Jeg har brug for et perl-script - ikke et java-script
Avatar billede graae Nybegynder
28. juni 1999 - 17:15 #7
Hallo var!

Det er sq da i perl!
se følgende linje:
http://www.holtze.dk/cgi_bin/formmail.pl
...Så vidt jeg ved står "pl" for PERL!
Det er bare at nakke filen og så er den i hus!...Det er da også bedst med lidt JavaScript da du så kan sikre dig at felterne er udfyldt ordentligt  :o)
...Mit svar er knageme rigtigt!
Avatar billede secret Nybegynder
28. juni 1999 - 18:21 #8
Fuck du er latterlig at høre på "graae" - det eksempel har ikke en skid med Perl at gøre!!! Og hvad tror du "holtze" siger til at du nasser på hans formmail-script!
Få dig et liv - og læs nogle MEGET tykke bøger om Perl & JavaScript, for du ved åbentbart ingenting om nogen af sprogene!!
Avatar billede Boddicker Seniormester
28. juni 1999 - 18:51 #9
Du har da vist ikke så meget forstand på perl. Det du henviser til er blot en ganske alm. formmail (ganske rigtig i perl), men det har intet - absolut intet - med et sms-script i perl at gøre...
Avatar billede doeleman Nybegynder
28. juni 1999 - 20:15 #10
Der findes et PERL-script på http://www.siebenthal.ch/programs.htm Håber du kan bruge det.
Avatar billede graae Nybegynder
28. juni 1999 - 20:44 #11
...Jeg har da også før fortalt at jeg ikke har en skid forstand på Perl...
...Men hvorfor h... hedder filen så *.PL?
...Om ikke andet så virker det da!
Avatar billede Boddicker Seniormester
28. juni 1999 - 21:17 #12
Jeg har også selv haft fundet filen hos siebenthal.ch, men kunne ikke bruge det, da filen er korrupt... Man kan ikke pakke det ud med Winzip, og hvis man pakker det ud med et andet program, kommer filen ud totalt phåked up. Desuden kræver den mere end blot mindre modificering at få til at du til danske forhold.

og mht. til graae: Nope, det java, du har posted, dur ikke hos min udbyder, og selvom formmail.pl ER en perl-fil, er det ikke det jeg spurgte om. Jeg har skam et fiiiiint mail-form-script i forvejen... så deeeeeet...
Avatar billede graae Nybegynder
29. juni 1999 - 09:59 #13
Ok...
...Har accepteret min nederlag...
...Beklager!
Avatar billede Boddicker Seniormester
29. juni 1999 - 10:45 #14
det er da helt okay...! :)
Avatar billede brylle Nybegynder
29. juni 1999 - 22:25 #15
tjek min hjemmeside ud der
er en sms besked sender
og den virker du skal bare lige kikke i
min html kode adressen er:
www.good-site.dk3.com
eller prøv www.sendsms.dk:der kan du
få en html kode der virker men det er
lidt svært at få den til at virke
Avatar billede brylle Nybegynder
29. juni 1999 - 22:28 #16
er du glad nu det tænkte jeg nok alle
andre der har prøplemer må også prøve
et af minne fif
Avatar billede Boddicker Seniormester
29. juni 1999 - 22:55 #17
Nej, jeg er egentlig ikke glad nu, for det var - endnu engang - ikke det jeg spurgte om. Jeg spurgte IKKE om, hvor man kunne finde en gratis sms-besked-sende-udbyder. Ej heller et java-script, php eller asp.
Men derimod spurgte jeg om et:

perl-script til afsendelse af sms-beskeder. D.v.s. et script ala sms.pl - vel at mærke eet der dur!
Avatar billede test43 Nybegynder
02. august 1999 - 23:39 #18

#!/usr/bin/perl
#SMS sender#
#benyt følgende navne i din form: nummer,fra,emne & tekst#

#først opdeler vi lige den sendte data#
read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
if (length($buffer) < 5) {
    $buffer = $ENV{QUERY_STRING};
    }
@pairs = split(/&/, $buffer);
foreach $pair (@pairs) {
    ($name, $value) = split(/=/, $pair);
    $value =~ tr/+/ /;
    $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
    $input{$name} = $value;
    }
# nu har vi så den sendte data gemt i variablerne $input{'variabel'} #
#Nu tjekkes det så om en af felterne mangler#
@felter = split (/\|/, "nummer|fra|emne|tekst");
foreach $felt(@felter) { if (!$input{'$felt'}) {
    print "content-type:text/html\n\n";
    print "Feltet <b>$felt</b> mangler!";
    exit;
    }}
# nu tjekkes det så hvilken udbyder nummeret er hos #
if($input{'nummer'} >= 20100000&& $input{'nummer'} <= 20599999)  { $udbyder="\@sms.tdm.dk";}
if($input{'nummer'} >=20600000&& $input{'nummer'}<= 20999999) {$udbyder="\@note.sonofon.dk";}
if($input{'nummer'} >= 21200000&& $input{'nummer'} <= 21999999) {$udbyder="\@sms.tdm.dk";}
if($input{'nummer'} >= 22100000&& $input{'nummer'} <= 22999999) {$udbyder="\@note.sonofon.dk";}
if($input{'nummer'} >= 23200000&& $input{'nummer'} <= 23499999) {$udbyder="\@sms.tdm.dk";}
if($input{'nummer'} >= 26100000&& $input{'nummer'} <= 26999999) {$udbyder="\@sms.mobilix.dk";}
if($input{'nummer'} >= 28100000&& $input{'nummer'} <= 28999999) {$udbyder="\@sms.mobilix.dk";}
if($input{'nummer'} >= 40100000&& $input{'nummer'} <= 40499999) {$udbyder="\@sms.tdm.dk";}
if($input{'nummer'} >= 40500000&& $input{'nummer'} <= 40999999) {$udbyder="\@note.sonofon.dk";}
if(!$udbyder) {
    print "content-type:text/html\n\n";
    print "Telefon-nummeret <b>$input{'nummer'}</b> er ugyldigt!\n";
    exit;
    }
$mailprog = '/usr/lib/sendmail';           
    open(MAIL,"|$mailprog -t");
    print MAIL "To: $input{'nummer'}$udbyder\n";
    print MAIL "From: $input{'fra'}\n";
    print MAIL "Subject: $input{'emne'}\n\n" ;
    print MAIL "$input{'tekst'}\n"; 
close (MAIL);

print "content-type:txt/html\n\n";
print "beskeden er sendt!";
exit;
Avatar billede test43 Nybegynder
02. august 1999 - 23:41 #19
ehe...lige en rettelse...
der skal stå "nummer\|fra\|emne\|tekst" istedet...(| skal have en backslash bag sig..)
Avatar billede mosman Nybegynder
12. august 1999 - 13:17 #20
tak for et fedt lille pearl script til sms beskeder. jeg har dog et lille problem med html´en...jeg bliver ved med at få beskeden "nummer mangler"
Hvis du har nogen gode ideer vil jeg være dig dybt taknemlig.
Avatar billede xsms Nybegynder
06. oktober 1999 - 21:34 #21
Hvor skal der stå nummer\|fra\|emne\|tekst
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester