Page 1 sur 1
[R] Insérer une image à coté d'un tableau (page HTML)
Posté : jeu. 12 nov. 2015 12:47
par Hugues
Bonjour,
Je génère une page HTML avec mon application.
Dans cette page, je voudrais mettre une tableau et une image JPEG. Pour le tableau c'est ok grace à la fonction _ArrayToHtml2D() et _IE.
Par contre je n'arrive pas à intégrer une image.
Merci par avance pour votre aide.
Re: [..] Insérer une image jpg dans une page HTML
Posté : jeu. 12 nov. 2015 13:46
par Hugues
J'ai avancé un peu... J'ai reussi à intégrer mon image, par contre elle est à la suite de mon tableau, hors je voudrais qu'elle soit à coté...
► Afficher le texte
Code : Tout sélectionner
Func _TEST()
If $fichierOK = True Then _ScreenCapture_CaptureWnd("C:\temp\PrintPicture.jpg", $MainGUI, 10, 30, $Wcourbe+45, $Hcourbe+70, False)
Local $hFileToRead = FileRead($FileToOpen)
Local $aReturns = _StringToArray2D($hFileToRead, @CRLF, ";", 1)
Local $iIndexaReturns = _ArraySearch($aReturns, "")
$iIndexaReturns = Int($iIndexaReturns)
Local $sRange = $iIndexaReturns & "-" & UBound($aReturns) - 1
_ArrayDelete($aReturns, $sRange)
;_ArrayDisplay($aReturns)
Local $html = _ArrayToHtml2D($aReturns)
$html = StringReplace($html, "'", "")
Local $oIE = _IECreate()
Local $oBody = _IETagNameGetCollection($oIE, "body", 0)
_IEDocInsertHTML($oBody, $html)
_IEDocInsertHTML($oBody, "<p><font color=blue>" & $FileToOpen & "</font></p>", "afterbegin")
If $fichierOK = True Then
_IEDocInsertHTML($oBody, "<img src= " & "C:\temp\PrintPicture.jpg>")
Else
_IEDocInsertHTML($oBody, "<p><font color=black>Pas de données pour tracer de courbe.</font></p>", "beforeend")
EndIf
EndFunc
Re: [..] Insérer une image jpg dans une page HTML
Posté : ven. 13 nov. 2015 18:01
par franco
Salut
Etant donné que tu ne fournis pas le code "complet", je ne peux pas tester.
Par contre, si j'ai bien compris, tu veux que ton tableau et ton image soit "aligné".
Tu utilises <p> et </p> puis tu affiches l'images.
Et si tu mettais </p> après ?
Car <p> et </p>, c'est souvent utilisé pour passer des lignes.
Du style :
Code : Tout sélectionner
_IEDocInsertHTML($oBody, "<p><font color=blue>" & $FileToOpen & "</font>", "afterbegin")
If $fichierOK = True Then
_IEDocInsertHTML($oBody, "<img src= " & "C:\temp\PrintPicture.jpg></p>")
Else
_IEDocInsertHTML($oBody, "<p><font color=black>Pas de données pour tracer de courbe.</font></p>", "beforeend")
EndIf
Ou alors utiles
align="absmiddle"
exemple :
Code : Tout sélectionner
Sélectionnez <img src="http://i.imgur.com/HXBGSGJ.png" align="absmiddle"/> (le seul) et cliquez sur <img src="http://i.imgur.com/fzBNmvo.png" align="absmiddle"/>
@+
Re: [..] Insérer une image jpg dans une page HTML
Posté : ven. 04 déc. 2015 14:41
par Hugues
Je suis de retour ^^ et je n'arrive pas à mettre mon image à coté de mon tableau
Ci-joint mon code:
Merci par avance pour votre aide...
► Afficher le texte
Code : Tout sélectionner
Func _CaulkingValues()
;$aFileValues -> TABLEAU RETOURNE PAR LA FONCTION _StringToArray2D()
$oIE = _IECreate("about:blank", 0,0,0)
local $hwndIE = _IEPropertyGet ($oIE, "hwnd")
$sHTML = @CRLF & "<!DOCTYPE HTML PUBLIC " & Chr(34) & "-//W3C//DTD HTML 4.01 Transitional//EN" & Chr(34) & @CRLF & @TAB & @TAB & Chr(34) & "http://www.w3.org/TR/html4/loose.dtd" & Chr(34) & ">" & @CRLF
$sHTML &= "<html>" & @CRLF
$sHTML &= "<head>" & @CRLF
$sHTML &= " <meta http-equiv=" & Chr(34) & "Content-Type" & Chr(34) & " content=" & Chr(34) & "text/html" & ";" & " charset=ISO-8859-1" & Chr(34) & ">" & @CRLF
$sHTML &= " <title>_MyHTMLSheet()</title>" & @CRLF
$sHTML &= "<style type=" & Chr(34) & "text/css" & Chr(34) & ">" & @CRLF
$sHTML &= "td { white-space:nowrap; background-color:transparent; color:black; font-size:10pt; font-weight:normal; font-family:monospace,arial,sans-serif; border-width:thin; border-style:none none none none; }" & @CRLF
$sHTML &= "body { background-color:transparent; color:black; font-size:8pt; font-weight:normal; font-family:monospace,arial,sans-serif; }" & @CRLF
$sHTML &= " .whitebox4 { background-color:white; font-size:8pt; padding:0px 0px 0px 6px; margin:0px 0px 0px 0px; border-bottom:3px solid #A8BAD2; width:100%; }" & @CRLF
$sHTML &= " .whitebox5 { background-color:white; font-size:8pt; padding:0px 0px 0px 6px; margin:0px 0px 0px 0px; width:100%; white-space:nowrap}" & @CRLF
$sHTML &= " .labelbox1 { background-color:#6E8CB2; color:white; font-size:9pt; font-weight:bold; padding:0px 0px 0px 6px; margin:5px 0px 5px 0px; border-top:2px solid #6E8CB2; border-bottom:2px solid #6E8CB2; width:710px; ; font-family:arial;}" & @CRLF
$sHTML &= " .labelbox2 { background-color:gray; color:white; font-size:8pt; font-weight:normal; padding:0px 0px 0px 6px; margin:0px 0px 0px 0px; border-top:2px solid #A8BAD2; border-bottom:2px solid #A8BAD2; width:710px; ; font-family:arial;}" & @CRLF
$sHTML &= " .headerbox1 { background-color:#A8BAD2; color:white; font-size:8pt; font-weight:bold; padding:0px 0px 0px 6px; margin:0px 0px 0px 0px; border-top:1px solid #A8BAD2; border-bottom:1px solid #A8BAD2; width:710px; font-family:arial; }" & @CRLF
$sHTML &= " .headerbox2 { background-color:#A8BAD2; color:white; font-size:8pt; font-weight:bold; padding:0px 0px 0px 6px; margin:0px 0px 0px 0px; border-top:1px solid #A8BAD2; border-bottom:1px solid #A8BAD2; width:710px; font-family:arial; }" & @CRLF
$sHTML &= " .blankline1 { background-color:white; color:white; padding:0px 0px 0px 0px; margin:0px 0px 0px 0px; border-style:none none none none; border-color:white white white white; height:3px; width:100%; }" & @CRLF
$sHTML &= " .blankline2 { background-color:white; color:white; padding:0px 0px 0px 0px; margin:0px 0px 0px 0px; border-style:none none none none; border-color:white white white white; height:6px; width:100%; }" & @CRLF
$sHTML &= " .blankline3 { background-color:white; color:white; padding:0px 0px 0px 0px; margin:0px 0px 0px 0px; border-style:none none none none; border-color:white white white white; height:9px; width:100%; }" & @CRLF
$sHTML &= " .dividingrule1 { background-color:#A8BAD2; color:#A8BAD2; padding:0px 0px 0px 0px; margin:10px 0px 10px 0px; border-style:none none none none; height:3px; width:710px; text-align:left; }" & @CRLF
$sHTML &= " .dividingrule2 { background-color:#A8BAD2; color:#A8BAD2; padding:0px 0px 0px 0px; margin:10px 0px 10px 0px; border-style:none none none none; height:6px; width:710px; text-align:left; }" & @CRLF
$sHTML &= " .dividingrule3 { background-color:#A8BAD2; color:#A8BAD2; padding:0px 0px 0px 0px; margin:10px 0px 10px 0px; border-style:none none none none; height:9px; width:710px; text-align:left; }" & @CRLF
$sHTML &= @CRLF
$sHTML &= "a:link { text-decoration:none; font-weight:normal; color:blue; }" & @CRLF
$sHTML &= "a:visited { text-decoration:none; font-weight:bold; color:blue; }" & @CRLF
$sHTML &= "a:hover { text-decoration:none; font-weight:bold; background-color:silver; }" & @CRLF
$sHTML &= "a:active { text-decoration:none; font-weight:bold; background-color:gray; }" & @CRLF
$sHTML &= "a:focus { text-decoration:none; font-weight:bold; background-color:teal; }" & @CRLF
$sHTML &= @CRLF
$sHTML &= ".cs1 { border-style:none none solid none; }" & @CRLF
$sHTML &= ".cs2 { border-style:none none solid none; }" & @CRLF
$sHTML &= ".cs3 { }" & @CRLF
$sHTML &= ".cs4 { }" & @CRLF
$sHTML &= ".cs5 { font-family:arial; }" & @CRLF
$sHTML &= ".cs6 { font-family:arial; }" & @CRLF
$sHTML &= ".cs7 { background-color:#3A5A82; color:white; font-size:8pt; font-family:arial; }" & @CRLF
$sHTML &= ".cs8 { border-bottom-color:gray; border-bottom-width:thin; border-style:none none solid none; background-color:white; color:black; font-size:8pt; font-family:arial; }" & @CRLF
$sHTML &= ".cs9 { background-color:white; color:black; font-size:8pt; font-family:arial; }" & @CRLF
$sHTML &= "</style>" & @CRLF
$sHTML &= "</head>" & @CRLF
$sHTML &= "<table border='0' cellpadding='0' cellspacing='0' rules='none' style='width:100%'><tbody valign='top'>" & @CRLF
$sHTML &= "<tr><td colspan=10 align='center' style='width:100%;background-color:#3A5A82; color:white; font-size:12pt; font-family:arial;'>MA PAGE HTML AVEC TABLEAU GRACE A AutoIt</font></td>" & @CRLF
$sHTML &= "<tr><td align='left' style='width:100%;border-style:none none solid none;'></td></tr>" & @CRLF
$sHTML &= "<tr><td align='left' style='width:100%;border-style:none none solid none;'>"& "Chemin: \\MonDossier\MonDossier2\</td></tr>" & @CRLF
$sHTML &= "</tbody></table>" & @CRLF
$sHTML &= "<BR>" & @CRLF
$sHTML &= "<BR>" & @CRLF
$sHTML &= _ArrayToHtml2D($aFileValues) & @CRLF
$sHTML &= "<BR>" & @CRLF
$sHTML &= "<table border='0' cellpadding='0' cellspacing='0' rules='none' style='width:100%'><tbody valign='top'>" & @CRLF
If $fichierOK = True Then
_ScreenCapture_CaptureWnd("C:\temp\PrintPicture.jpg", $MainGUI, 10, 30, $Wcourbe+45, $Hcourbe+70, False)
$sHTML &= "<img src= 'C:\temp\PrintPicture.jpg' align='absmiddle'/>" & @CRLF
Else
$sHTML &= "<tr><td align='left' style='width:100%;border-style:none none solid none;'></td></tr>" & @CRLF
$sHTML &= "<tr><td align='left' style='width:100%;border-style:none none none none;'>Pas de données pour tracer de courbe.</td></tr>" & @CRLF
EndIf
$sHTML &= "</tbody></table>" & @CRLF
$sHTML &= "<BR>" & @CRLF
$sHTML &= "<table border='0' cellpadding='0' cellspacing='0' rules='none' style='width:100%'><tbody valign='top'>" & @CRLF
$sHTML &= "<tr><td align='left' style='width:100%;border-style:none none solid none;'></td></tr>" & @CRLF
$sHTML &= "<tr><td align='left' style='width:100%;border-style:none none solid none;'>Generated by X-Press CurveViewer Powered By THEVENET Hugues (MlsP-Maint_MOE22) le " & _Now() & " sur " & @ComputerName & "-" & @LogonDomain & "-" & StringUpper(@UserName) & ".</td></tr>" & @CRLF
$sHTML &= "</tbody></table>" & @CRLF
_IEDocWriteHTML($oIE, $sHTML)
WinSetState($hwndIE, "", @SW_MAXIMIZE)EndFunc
Re: [R] Insérer une image à coté d'un tableau (page HTML)
Posté : ven. 04 déc. 2015 16:34
par Hugues
C'est bon j'ai trouvé ^^
J'ai modifié ma fonction _ArrayToHtml2D(), j'ai fait Return $sResult; & '</table>' & @CRLF au lieu de Return $sResult & '</table>' & @CRLF