22. februar 2002 - 21:54Der er
60 kommentarer og 1 løsning
Jmail body med linieskift
Jeg forsøger at få min jmail body til at medtage linieskift, men det hele kommer bare ud i en smøre.
Jeg har forsøgt at bruge vbCrLf men det spiller vist ikke.
Denne streng ligger jeg i body:
var text = ""; text = text + "Linie 1"; test = text + 'vbCrLf'; text = text + "linie 2"; text = text + "linie 3"; text = text + "Linei 4"; text = text + "Linie 5"; text = text + "linie 6";
strTekst = "" strTekst = strTekst & "bla bla bla linie 1" & vbCrLf strTekst = strTekst & "bla bla bla linie 2" & vbCrLf strTekst = strTekst & "bla bla bla linie 3" & vbCrLf strTekst = strTekst & "bla bla bla linie 4" & vbCrLf strTekst = strTekst & "bla bla bla linie 5" & vbCrLf strTekst = strTekst & "bla bla bla linie 6" & vbCrLf
nej, nu må du da holde op! - "text" får jo bare tilføjet noget ekstra i hver linie. Den eneste forskel på din og min er at du har startet med at sætte strTekst = "", hvilket er totalt unødvendigt.
Jeg er ved at lave en online-editor. Man kan gøre tekst bold, italic, underline - indsætte links osv. Nu vil jeg gerne kunne indsætte billeder. Jeg har så lavet en knap, der åbner et nyt vindue med et script der uploader billedet. Hvordan får gør jeg sådan at <img src=" FILNAVN"> indsættes i den rediger-bare tekst og vinduet med upload-tingen lukkes automatisk??
Får sgu en fejl: opener.form1.editor is null or not an object ?? formen hedder form1 og textarea hedder editor. Har det noget at sige, at det ligger i en frame?
tænker på noget: "opener" må være den side, siden er henvist fra. Men form1 ligger jo ikke én side tilbage, men 2 (!) - Editor -> Indsæt billede -> Upload Billede + indsæt data i formen i editor
Jeg har jo bare flyttet din kode over i UploadExe.asp - ellers får jeg jo filnavnet med? - uploadexe.asp ser sådan ud:
<% Response.Buffer = True %> <% ' Variables ' ********* Dim mySmartUpload Dim file Dim intCount intCount=0
' Object creation ' *************** Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
' Upload ' ****** mySmartUpload.Upload
' Select each file ' **************** For each file In mySmartUpload.Files
' Only if the file exist ' ********************** If not file.IsMissing Then
' Save the files with his original names in a virtual path of the web server ' **************************************************************************
' sample with a physical path ' file.SaveAs("c:\temp\" & file.FileName) ' Display the properties of the current file ' ******************************************
' Display the number of files which could be uploaded ' *************************************************** Response.Write("<BR>" & mySmartUpload.Files.Count & " files could be uploaded.<BR>")
' Display the number of files uploaded ' ************************************
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.