---
title: "Byta/skicka lösen??"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/65778-byta-skicka-lösen"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "fesoj"
published: "2003-01-22T09:39:01.000Z"
updated: "2003-01-22T21:34:13.000Z"
replies: 8
views: 246
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/65778-byta-skicka-lösen"
---

# Byta/skicka lösen??

## #1 — fesoj, 2003-01-22T09:39Z

Nån som har nån fin kod som gör att man kan byta lösen i en Accesdatabas? Jag undrar också om det finns nån som har en funktion som skickat det lösenordet man angivit till sin mail! På en community alltså! Tacksam för hjälp! // josef

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

## #2 — fesoj, 2003-01-22T09:40Z

alltså jag har gjort en community och det är altså en användare som ska ändra/skicka efter lösenordet!

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

## #3 — Quid, 2003-01-22T09:45Z

Jag har tänkte på en sak, det verkar som om folk tror att det finns standard-koder till ASP som bara är att kopiera in i sin kod så funkar det direkt. Så är inte fallet (med undantag för vissa funktioner) och för att någon ska kunna hjälpa dig så behöver du bidra med viss information, gärna lite kod och framför allt hur databasen är utformad och vad fälten heter.

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

## #4 — TainEvil, 2003-01-22T09:46Z

Fel forum!

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

## #5 — Quid, 2003-01-22T09:51Z

Det är väl inte fel forum? Killen vill ha hjälp med lite ASP-kod och han ställer en fråga i ASP-forumet.

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

## #6 — TainEvil, 2003-01-22T09:57Z

> Det är väl inte fel forum? Killen vill ha hjälp med lite ASP-kod och han ställer en fråga i ASP-forumet.

 
Jag tycker att det är fel forum, då man i stort sett ber att få färdig kod för att utföra en uppgift. Detta tycker jag man ska be om i jobb & tjänster forumen.

Om man däremot visar lite kod och frågar om ett specifikt problem är det en annan sak!  :)

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

## #7 — fesoj, 2003-01-22T10:07Z

alltså jag har en databas som ex. db.mdb och ska skriva till tblMembers där det finns en fält som heter "losen"! Jag vill alltså lägga till en funktion på min sida där medlemmarna kan skicka efter sitt lösen till sin angivna mail! Antagligen använder man sig av Jmail men jag vet inte hur!

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

## #8 — TainEvil, 2003-01-22T10:10Z

Har du JMail på servern?

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

## #9 — wazid, 2003-01-22T21:34Z

Ett liten kodsnutt jag använder mig av på en sida som kör JMail
JMail.ServerAddress måste du ändra till rätt värde.
Du bör även lägga in en funktion som kontrollerar efter förbjudna tecken etc.

```
Dim JMail, Connect, RecSet, Visa
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& Server.MapPath("..\db\data.mdb")&" "

'Funktion som mailar inloggningsuppgifter till registrerad epostadress-----------------------------------------------------------------------------

	If Request.Form("epost")<>"" Then
		Visa = "SELECT * FROM Members WHERE Epost='" &(Request.Form("epost")) & "' AND Status=20"
		Set RecSet = Connect.Execute(Visa)
		If RecSet.EOF Then
			Response.Write "Tyvärr finns ingen medlem med den epostadressen :"&Request.Form("epost")&" registrerad.<BR>"
			Else
			Set JMail = Server.CreateObject("JMail.SMTPMail") 
			JMail.ServerAddress = "smtp.domain.com"
			JMail.Sender = "info@domain.com" 
			JMail.Subject = "Dina uppgifter från XXXX"
			JMail.AddRecipient RecSet("Epost")
			JMail.Body = "Här är dina inloggningsuppgifter för XXX ."&VbCrLf&"Användarnamn : "&RecSet("Username")&VbCrLf&"Lösenord : "&RecSet("Password")&""
			JMail.Priority = 3
			JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
			JMail.Execute
			Set JMail=Nothing
			Response.Write "Dina inloggningsuppgifter har skickats via email till den adress du uppgav."
		End If
		RecSet.Close
	End If
```

MvH

David

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/65778-byta-skicka-lösen