Notifikationer

Markér alle som læst Log ud

smidt Novice

22. marts 2001 - 15:06 Der er 2 kommentarer og
1 løsning

Værdi

Hvordan trækker jeg en værdi fra en side til en anden.

Værdien fra siden er i et felt der hedder sagsnr. og skal lande i et feldt der hedder evt det samme.

Når jeg kalder den anden side sker det via et link......

Synes godt om

jimmidreng Nybegynder

22. marts 2001 - 15:08 #1

Dette er jo Visual Basic kategorien, mener du forms eller side?

Hvis det er forms er svaret:

I form2:
Text1.text = form1.text1.text

Eller du kan erklære en variabel som Public og så hente den:

form1.variabel

Synes godt om

smidt Novice

22. marts 2001 - 15:21 #2

Det ved jeg godt....den side jeg kalde er nedenstående og jeg vil så gerne have at den vedhæftede fil (AttachFile) er den værdi der kommer fra den side jeg kommer fra. eller er det bedre at filen bliver hentet fra en database mde
Alle data ligger i access

<% @LANGUAGE = VBScript %>
<% Option Explicit %>
<html>
<head>
<title>test</title>
<title>test</title>
</head>
<body bgcolor=#ffffff>
<%
Dim strName, strEmail, strAdress, strQuery, strBy
strName = Trim(Request.Form(\"ClientName\"))
strEmail = Trim(Request.Form(\"ClientEmail\"))
strAdress = Trim(Request.Form(\"ClientAdress\"))
strQuery = Trim(Request.Form(\"ClientQry\"))
strBy = Trim(Request.Form(\"ClientBy\"))

If (strName <> \"\" And strAdress <> \"\" And strBy <> \"\") Then
Dim objMail, aRecipients
Set objMail = Server.CreateObject(\"CDONTS.NewMail\")

objMail.From = \"22@xx.dk\"
objMail.To = strEmail
objMail.Subject = \"Fremsendelse af opstilling via eMail til \" & strName

aRecipients = Array(\"11@xx.dk\", _
\"33@xx.dk\")

objMail.AttachFile Server.MapPath(\"../Pdfer/1809_d6.PDF\")

objMail.BCC = Join(aRecipients, \";\")
objMail.Body = \"Hermed fremsendes den bestilte opstilling! \" & strName
objMail.Send

Response.Write \"Tak for din bestilling! \" & strName

Set objMail = Nothing
Else
%>

<h1> </h1>

<p> </p>

<FORM ACTION=\"<%=Request.ServerVariables(\"SCRIPT_NAME\")%>\" METHOD=POST>
<TABLE BORDER=0>
<tr><td>Name:</td><td><IMG border=0 src=\"../images/stjerne.gif\" width=\"10\" height=\"10\"></td><td><INPUT NAME=\"ClientName\" VALUE=\"\" SIZE=57></td></tr>
<tr><td>Adresse:</td><td><IMG border=0 src=\"../images/stjerne.gif\"></td><td><input type=\"text\" name=\"ClientAdress\" size=\"57\"></td></tr>
<tr><td>Postnr. og by:</td><td><IMG border=0 src=\"../images/stjerne.gif\" width=\"10\" height=\"10\"></td><td><input type=\"text\" name=\"ClientBy\" size=\"57\"></td></tr>
<tr><td>Tlf:</td><td></td><td><input type=\"text\" name=\"telefon\" size=\"18\">Tlf (arbejde/mobil):<input type=\"text\" name=\"TlfArbejde\" size=\"16\"></td></tr>
<tr><td>eMail:</td><td></td><td><INPUT TYPE=TEXT NAME=\"ClientEmail\" VALUE=\"\" SIZE=40></td></tr>
<tr><td valign=top>Comment/Question</td><td></td><td><TEXTAREA NAME=\"ClientQry\" COLS=40 ROWS=10></TEXTAREA></td></tr>
<tr><td></td><td></td><td> 
<p><INPUT TYPE=SUBMIT VALUE=\"Send\"></p>
</td></tr>
</TABLE>
</FORM>

<% End If %>

<p> </p>

</body></html>

Synes godt om

smidt Novice

27. marts 2001 - 18:54 #3

Jeg lukker

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra Visual Basic kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Send mail fra "Outlook New" via VBA i excel Af lonmat i Visual Basic	5	29/08/202512:28	04/09/202515:48
Klik Event i MS Project Af per2edb i Visual Basic	0	05/08/202510:10	-
VBA koder lagt i MS project kolonner Af per2edb i Visual Basic	0	16/05/202512:31	-
Foto fra Word eller Excel Af MSchlamovitz i Visual Basic	1	22/04/202514:55	25/04/202511:21
Proxy server.. Af SommerFyr i Visual Basic	12	10/07/202417:34	12/07/202414:34

Se alle spørgsmål i kategorien Opret spørgsmål

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

Alle kategorier på Eksperten

Seneste artiklerRSS