---
title: "glömt lösenordet? -> skicka mail"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/41845-glömt-lösenordet-skicka-mail"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Sico"
published: "2002-04-16T21:46:01.000Z"
updated: "2002-04-16T22:22:58.000Z"
replies: 3
views: 206
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/41845-glömt-lösenordet-skicka-mail"
---

# glömt lösenordet? -> skicka mail

## #1 — Sico, 2002-04-16T21:46Z

Mailet skickas och allt i det stämmer men jag har en problem ändå..

Forluläret set altså ut så att man skriver in ett användarnamn så skickas lösen till dess mail han/hon hade under sina inställningar... 

```
If Request.QueryString("reqlosen") = "req" Then 

If Not Isnull(Request.Form("Username")) Then strUsername = Cstr(Request.Form("Username"))

SQL = "SELECT f_User, f_Password, f_Mail FROM t_Members where f_User = '" & strUsername & "'"

set RSConn = Connect.Execute(SQL)

	Set CDOMail = Server.CreateObject("CDONTS.NewMail")
	CDOMail.From = "sico__@hotmail.com"
	CDOMail.To = RSConn("f_Mail")
	CDOMail.Subject = "Ditt lösenord"
	CDOMail.Body = "Ditt lösenord är = " & RSConn("f_Password") & ""
	CDOMail.Send
	If CDOMail.Send=true Then
	[b]Response.Write "Lösenordet är skickat till din mail"[/b]
	Else
	Response.Write "Det gick inte att hitta användaren"
	End If
	Set CDOMail = Nothing

End If
```

Men jag får felmeddelande när det är skickat

> Error Type:
> (0x80040108)
> /forum/login.asp, line 129

 Rad 129 är markerad med fet stil... vad e fel?

Har ni nåt bättre sätt att utföra det hela så är jag öppen för förslag...

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

## #2 — icaaq, 2002-04-16T22:09Z

Testa

```
[red]
On Error Resume Next
Set CDOMail = Server.CreateObject("CDONTS.NewMail")
	CDOMail.From = "sico__@hotmail.com"
	CDOMail.To = RSConn("f_Mail")
	CDOMail.Subject = "Ditt lösenord"
	CDOMail.Body = "Ditt lösenord är = " & RSConn("f_Password") & ""
	CDOMail.Send
If Err.Number <> 0 Then
                Response.Write "Lösenordet är skickat till din mail"
	Else
	Response.Write "Det gick inte att hitta användaren"
	End If
[/red]
```

nått sånt

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

## #3 — Sico, 2002-04-16T22:20Z

funkade utmärkt förutom att det va fel meddelande på fel ställe ;)

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

## #4 — icaaq, 2002-04-16T22:22Z

opps :r

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/41845-glömt-lösenordet-skicka-mail