---
title: "Ifsats i ett skickamailscript"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/67094-ifsats-i-ett-skickamailscript"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "MickeA.com"
published: "2003-02-03T21:24:28.000Z"
updated: "2003-02-03T21:34:27.000Z"
replies: 2
views: 215
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/67094-ifsats-i-ett-skickamailscript"
---

# Ifsats i ett skickamailscript

## #1 — MickeA.com, 2003-02-03T21:24Z

Hej

Har ett mailerscript som kör med Jmail och ett formulär i Flash, nu är det en ifsats i scriptet som krånglar.

Så här ser allt ut:

\<%
Option Explicit
Dim fornamn, efternamn, email, hemsida, telefon, telefax, meddelande, subject, recipient, web_site, msg

'\________________________________________\_

fornamn = Request.Form("fornamn")
efternamn = Request.Form("efternamn")
email = Request.Form("email")
hemsida = Request.Form("hemsida")
telefon = Request.Form("telefon")
telefax = Request.Form("telefax")
meddelande = Request.Form("meddelande")

'\________________________________________\_

subject = "Mail Från Hemsidan..."
recipient = "Info@MickeA.com"

'\________________________________________\_

Server.HTMLEncode("fornamn")
Server.HTMLEncode("efternamn")
Server.HTMLEncode("meddelande")

'\________________________________________\_

if hemsida = "http://www." then
	web_site = hemsida
end if

if hemsida = "www." then
	web_site = "http://" & hemsida
end if

if hemsida \<\> "." then
	web_site = "Ingen Hemsida"
end if

'\________________________________________\_

set msg = Server.CreateOBject( "JMail.Message" )

msg.From = email
msg.FromName = fornamn & " " & efternamn
msg.AddRecipient recipient
msg.Subject = subject

'\________________________________________\_

msg.body = "Namn:  " & fornamn & " " & efternamn & vbcrlf & "Emailadress:  " & email & vbcrlf & "Hemsida:  " & web_site & vbcrlf & "Telefonnummer:  " & telefon & vbcrlf & "Telefaxnummer:  " & telefax & vbcrlf & vbcrlf & "Meddelande:  " & vbcrlf & meddelande

'\________________________________________\_

if not msg.Send("smtp.mickea.com" ) then
Response.write "&skickat=nej"
else
Response.write "&skickat=ja"
end if
%\>

Det är alltså det stycket med ifsatsen som kollar "hemsida" so spökar.

Det som ska hända är att:

1\. Om textfältet hemsida innehåller "http://www." ska värdet av hemsida sättas som värde av "Web_site".

2\. Om textfältet hemsida innehåller "www." ska "http://" läggas till framför. och sättas som värde av "Web_site".

3\. Om det inte finns med ngn punkt i textrutan, dvs. om textfältet inte innehåller ngn riktigt webadress, ska värdet av !Web_site" bli "Ingen Hemsida".

Har såna jävla problem med det här, för hela tiden blir värdet "Ingen Hemsida" OAVSETT VAD MAN SKRIVER I TEXTFÄLTET.

Hjälp Hjälp Hjäklp

//Micke - Nybörjare

Permalänk: https://www.webforum.nu/p/67094

## #2 — @nders, 2003-02-03T21:28Z

```
if left(hemsida, 11) = "http://www." then 
web_site = hemsida 
end if 

if left(hemsida, 4) = "www." then 
web_site = "http://" & hemsida 
end if 

if not instr(hemsida, ".") >0 then 
web_site = "Ingen Hemsida" 
end if
```

För att din kod ska bli lättläst så vore det bra om du använde \[kod\]-taggar.

Och du, välkommen till wF! :)

Mvh,

Permalänk: https://www.webforum.nu/p/937392

## #3 — MickeA.com, 2003-02-03T21:34Z

Ok...

Tack så mkt, trevligt med ett välkomnande o allt, är ren och skär nybörjare, men det ger sig mer o mer för varj dag som tickar...

Permalänk: https://www.webforum.nu/p/937394

---

Tråden på webben: https://www.webforum.nu/amne/asp/67094-ifsats-i-ett-skickamailscript