{"id":299,"date":"2022-12-04T05:51:41","date_gmt":"2022-12-04T04:51:41","guid":{"rendered":"http:\/\/lesmrdtrucs.mataf35400.fr\/?page_id=299"},"modified":"2022-12-06T08:33:00","modified_gmt":"2022-12-06T07:33:00","slug":"les-fonctions-qui-servent-souvent","status":"publish","type":"page","link":"https:\/\/lesmrdtrucs.mataf35400.fr\/index.php\/les-fonctions-qui-servent-souvent\/","title":{"rendered":"Les fonctions qui servent souvent"},"content":{"rendered":"\t\t
\n\t\t\t\t\t\t
\n\t\t\t\t\t\t
\n\t\t\t\t\t
\n\t\t\t
\n\t\t\t\t\t\t
\n\t\t\t\t
\n\t\t\t

File Scripting Object<\/h2>\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t
\n\t\t\t\t
\n\t\t\t

Files<\/h3>\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t
\n\t\t\t\t
\n\t\t\t\t\t\t\t

Description<\/b>: Donne acc\u00e8s aux propri\u00e9t\u00e9s d’un fichier.
Note<\/b>: Le code suivant illustre l’obtention d’un objet File et l’affichage d’une de ses propri\u00e9t\u00e9s.
Function ShowDateCreated(filespec)<\/em><\/span>
\u00a0\u00a0 \u00a0Dim fso, f<\/em><\/span>
\u00a0\u00a0 \u00a0Set fso = CreateObject(\u00ab\u00a0Scripting.FileSystemObject\u00a0\u00bb)<\/em><\/span>
\u00a0\u00a0 \u00a0Set f = fso.GetFile(filespec)<\/em><\/span>
\u00a0\u00a0 \u00a0ShowDateCreated = f.DateCreated<\/em><\/span>
End Function<\/em><\/span><\/p>\t\t\t\t\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t

\n\t\t\t\t
\n\t\t\t

Copy<\/h3>\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t
\n\t\t\t\t
\n\t\t\t\t\t\t\t

Description<\/b>: Copie un fichier ou un dossier sp\u00e9cifi\u00e9 d’un emplacement vers un autre.
Notes<\/b>: Le r\u00e9sultat de la m\u00e9thode Copy sur un objet File ou Folder est identique \u00e0 celui de FileSystemObject.CopyFile ou FileSystemObject.CopyFolder o\u00f9 le fichier ou le dossier r\u00e9f\u00e9renc\u00e9s par object est pass\u00e9 en argument. Notez cependant que ces m\u00e9thodes alternatives sont capables de copier plusieurs fichiers ou dossiers.<\/p>

\u00a0\u00a0\u00a0 Set fso = CreateObject(\u00ab\u00a0Scripting.FileSystemObject\u00a0\u00bb)
\u00a0\u00a0 \u00a0Set a = fso.CreateTextFile(\u00ab\u00a0c:.txt\u00a0\u00bb, True)
\u00a0\u00a0 \u00a0a.WriteLine(\u00ab\u00a0Ceci est un test.\u00a0\u00bb)
\u00a0\u00a0 \u00a0Set a = fso.GetFile(\u00ab\u00a0c:.txt\u00a0\u00bb)
\u00a0\u00a0 \u00a0a.Copy (\u00ab\u00a0c:.txt\u00a0\u00bb)
<\/em><\/span><\/p>\t\t\t\t\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t

\n\t\t\t\t
\n\t\t\t

Subfolders<\/h3>\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t
\n\t\t\t\t
\n\t\t\t\t\t\t\t

Description<\/b>: Copie un fichier ou un dossier sp\u00e9cifi\u00e9 d’un emplacement vers un autre.
Notes<\/b>: Le r\u00e9sultat de la m\u00e9thode Copy sur un objet File ou Folder est identique \u00e0 celui de FileSystemObject.CopyFile ou FileSystemObject.CopyFolder o\u00f9 le fichier ou le dossier r\u00e9f\u00e9renc\u00e9s par object est pass\u00e9 en argument. Notez cependant que ces m\u00e9thodes alternatives sont capables de copier plusieurs fichiers ou dossiers.<\/p>

Sub AfficheListeDossier(specdossier)
\u00a0\u00a0 \u00a0Dim fs, f, f1, s, sf
\u00a0\u00a0 \u00a0Set fs = CreateObject(\u00ab\u00a0Scripting.FileSystemObject\u00a0\u00bb)
\u00a0\u00a0 \u00a0Set f = fs.GetFolder(specdossier)
\u00a0\u00a0 \u00a0Set sf = f.SubFolders
\u00a0\u00a0 \u00a0For Each f1 in sf
\u00a0\u00a0 \u00a0\u00a0\u00a0\u00a0 s = s & f1.name
\u00a0\u00a0 \u00a0\u00a0\u00a0\u00a0 s = s &\u00a0 vbCrLf
\u00a0\u00a0 \u00a0Next
\u00a0\u00a0 \u00a0MsgBox s
End Sub
<\/em><\/span><\/p>\t\t\t\t\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t

\n\t\t\t\t
\n\t\t\t

Explorer tous les sous-dossiers<\/h3>\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t
\n\t\t\t\t
\n\t\t\t\t\t\t\t

Dans les r\u00e9f\u00e9rences du projet, ajouter<\/p>\t\t\t\t\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t

\n\t\t\t\t
\n\t\t\t\t\t\t\t\t\t\t\t\t\t\"\"\t\t\t\t\t\t\t\t\t\t\t\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t
\n\t\t\t\t
\n\t\t\t\t\t\t\t

Sub Command1_Click()<\/em><\/span>
\u00a0\u00a0 \u00a0Dim fso As New FileSystemObject<\/em><\/span>
\u00a0\u00a0 \u00a0ExploreFolder fso.GetFolder(\u00ab\u00a0D:\\Toto\u00a0\u00bb)<\/em><\/span>
End Sub<\/em><\/span><\/p>

Sub ExploreFolder(fld As Folder)<\/em><\/span>
\u00a0\u00a0 \u00a0‘ Interruption<\/span><\/em><\/span>
\u00a0\u00a0 \u00a0If toto Then Exit Sub<\/em><\/span><\/p>

\u00a0\u00a0 \u00a0‘ Affiche les fichiers dans le Debug<\/span><\/em><\/span>
\u00a0\u00a0 \u00a0Dim f As File<\/em><\/span>
\u00a0\u00a0 \u00a0For Each f In fld.Files<\/em><\/span>
\u00a0 \u00a0\u00a0\u00a0\u00a0 Debug.Print f.Name<\/em><\/span>
\u00a0 \u00a0\u00a0\u00a0\u00a0 ‘ Pour d\u00e9tecter la touche d’arr\u00eat<\/span><\/em><\/span>
\u00a0 \u00a0\u00a0\u00a0\u00a0 DoEvents<\/em><\/span>
\u00a0\u00a0 \u00a0Next\u00a0\u00a0\u00a0 <\/em><\/span><\/p>

\u00a0\u00a0 \u00a0‘ Traite les sous-dossiers<\/span><\/em><\/span>
\u00a0\u00a0 \u00a0Dim fld1 As Folder<\/em><\/span>
\u00a0\u00a0 \u00a0For Each fld1 In fld.SubFolders<\/em><\/span>
\u00a0\u00a0 \u00a0\u00a0\u00a0\u00a0 ExploreFolder fld1<\/em><\/span>
\u00a0\u00a0 \u00a0Next<\/em><\/span>
End Sub<\/em><\/span><\/p>\t\t\t\t\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t\t<\/div>\n\t\t<\/div>\n\t\t\t\t\t<\/div>\n\t\t<\/section>\n\t\t\t\t

\n\t\t\t\t\t\t
\n\t\t\t\t\t
\n\t\t\t
\n\t\t\t\t\t\t
\n\t\t\t\t
\n\t\t\t

R\u00e9cup\u00e9ration de la version d'un fichier<\/h2>\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t
\n\t\t\t\t
\n\t\t\t\t\t\t\t

J’ai fait une appli qui utilise cette ressource: Date des fichiers.
Je suis parti de la source:
https:\/\/codes-sources.commentcamarche.net\/source\/638-information-version-type-copyright-description-d-un-fichier-ocx-dll-ou-exe<\/a><\/p>\t\t\t\t\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t\t<\/div>\n\t\t<\/div>\n\t\t\t\t\t<\/div>\n\t\t<\/section>\n\t\t\t\t

\n\t\t\t\t\t\t
\n\t\t\t\t\t
\n\t\t\t
\n\t\t\t\t\t\t
\n\t\t\t\t
\n\t\t\t

Taille utilisable de l'\u00e9cran<\/h2>\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t
\n\t\t\t\t
\n\t\t\t\t\t\t\t

Dans un module:

Public Declare Function SystemParametersInfo Lib \u00ab\u00a0user32\u00a0\u00bb Alias \u00ab\u00a0SystemParametersInfoA\u00a0\u00bb (ByVal uAction As Long, ByVal uParam As Long, ByRef lpvParam As RECT, \u00a0\u00a0\u00a0 \u00a0\u00a0\u00a0 \u00a0\u00a0\u00a0 ByVal fuWinIni As Long) As Long<\/em><\/span>
Public Const SPI_GETWORKAREA = 48<\/em><\/span>
Private Type RECT<\/em><\/span>
\u00a0\u00a0 \u00a0Left As Long<\/em><\/span>
\u00a0\u00a0 \u00a0Top As Long<\/em><\/span>
\u00a0\u00a0\u00a0 Right As Long<\/em><\/span>
\u00a0\u00a0\u00a0 Bottom As Long<\/em><\/span>
End Type<\/em><\/span>

Public Function LargeurEcran() As Long<\/em><\/span>
\u00a0\u00a0\u00a0 Dim Prect As RECT<\/em><\/span>
\u00a0\u00a0\u00a0 If SystemParametersInfo(SPI_GETWORKAREA, 0, Prect, 0) Then<\/em><\/span>
\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 LargeurEcran = (Prect.Right – Prect.Left) * Screen.TwipsPerPixelX<\/em><\/span>
\u00a0\u00a0\u00a0 End If<\/em><\/span>
End Function<\/em><\/span>

Public Function HauteurEcran() As Long<\/em><\/span>
\u00a0\u00a0\u00a0 Dim Prect As RECT<\/em><\/span>
\u00a0\u00a0\u00a0 If SystemParametersInfo(SPI_GETWORKAREA, 0, Prect, 0) Then<\/em><\/span>
\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 HauteurEcran = (Prect.Bottom – Prect.Top) * Screen.TwipsPerPixelY<\/em><\/span>
\u00a0\u00a0\u00a0 End If<\/em><\/span>
End Function<\/em><\/span><\/p>\t\t\t\t\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t\t<\/div>\n\t\t<\/div>\n\t\t\t\t\t<\/div>\n\t\t<\/section>\n\t\t\t\t

\n\t\t\t\t\t\t
\n\t\t\t\t\t
\n\t\t\t
\n\t\t\t\t\t\t
\n\t\t\t\t
\n\t\t\t

R\u00e9cup\u00e9ration du nom d'un volume<\/h2>\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t
\n\t\t\t\t
\n\t\t\t\t\t\t\t

Function RecupereLettreDisque(NomDisque As String)<\/em><\/span>
\u00a0\u00a0 \u00a0Dim fs, f, f1, s<\/em><\/span>
\u00a0\u00a0 \u00a0Set fs = CreateObject(\u00ab\u00a0Scripting.FileSystemObject\u00a0\u00bb)<\/em><\/span>
\u00a0\u00a0 \u00a0Set f = fs.drives<\/em><\/span>
\u00a0\u00a0 \u00a0For Each s In f<\/em><\/span>
\u00a0\u00a0 \u00a0\u00a0\u00a0\u00a0 If s.isready Then<\/em><\/span>
\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 \u00a0\u00a0\u00a0\u00a0 If s.volumeName = NomDisque Then RecupereLettreDisque = s<\/em><\/span>
\u00a0\u00a0 \u00a0\u00a0\u00a0\u00a0 End If<\/em><\/span>
\u00a0\u00a0 \u00a0Next<\/em><\/span>
End Function<\/em><\/span><\/p>\t\t\t\t\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t\t<\/div>\n\t\t<\/div>\n\t\t\t\t\t<\/div>\n\t\t<\/section>\n\t\t\t\t

\n\t\t\t\t\t\t
\n\t\t\t\t\t
\n\t\t\t
\n\t\t\t\t\t\t
\n\t\t\t\t
\n\t\t\t

Les MRD constantes<\/h2>\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t
\n\t\t\t\t
\n\t\t\t\t\t\t\t

‘—————Les codes de couleur<\/span>
Public Const MrdBlanc As Double = &HFFFFFF
Public Const MrdGrisClair As Double = &HC0C0C0
Public Const MrdGrisFonc\u00e9 As Long = &H808080
Public Const MrdNoir As Double = &H80000008
Public Const MrdJaunePale As Long = &HC0FFFF
Public Const MrdJaune As Long = &HFFFF&
Public Const MrdSaumon As Long = &HC0C0FF
Public Const MrdOrangePale As Long = &HC0E0FF
Public Const MrdOrange As Double = &H80FF&
Public Const MrdMagenta As Double = &HFF00FF
Public Const MrdRouge As Double = &HFF&
Public Const MrdVertPale As Long = &HC0FFC0
Public Const MrdVertClair As Double = &HFF00&
Public Const MrdVertFonc\u00e9 As Double = &HC000&
Public Const MrdCyan As Double = &HFFFF00
Public Const MrdBleu As Double = &HFF0000

‘—————Les types de donn\u00e9es des champs de MDB<\/span>
‘for i=0 to data.Recordset.Fields.Count-1:print<\/span> data.Recordset.Fields(i).Type:next i
Public Const MrdBddNumAuto As Integer = 4
Public Const MrdBddDate As Integer = 8
Public Const MrdBddTexte As Integer = 10
Public Const MrdBddNumeric As Integer = 7

‘—————Les dur\u00e9es pour calcul de d\u00e9calage<\/span>
‘Exemple:<\/span>
<\/em><\/span>If CDbl(CDate(Now) – CDate(ficdate)) > MrdUneHeure Then
Public Const MrdUnAn As Double = 365
Public Const MrdUnMois As Double = 31
Public Const MrdUneSemaine As Double = 7
Public Const MrdUnJour As Double = 1
Public Const MrdUneHeure As Double = 4.16666666715173E-02
Public Const MrdUneMinute As Double = 6.94444439432118E-04
Public Const MrdUneSeconde As Double = 1.15740695036948E-05

‘—————Les codes de touches (keycode)<\/span>
Public Const MrdKeycodeBackSpace As Integer = 8
Public Const MrdKeycodeTab As Integer = 9
Public Const MrdKeycodeMaj As Integer = 16
Public Const MrdKeycodeCtrl As Integer = 17
Public Const MrdKeycodeAlt As Integer = 18
Public Const MrdKeycodeEsc As Integer = 27
Public Const MrdKeycodeSpace As Integer = 32
Public Const MrdKeycodePageUp As Integer = 33
Public Const MrdKeycodePageDown As Integer = 34
Public Const MrdKeycodeEnd As Integer = 35
Public Const MrdKeycodeHome As Integer = 36
Public Const MrdKeycodeLeft As Integer = 37
Public Const MrdKeycodeUp As Integer = 38
Public Const MrdKeycodeRight As Integer = 39
Public Const MrdKeycodeDown As Integer = 40
Public Const MrdKeycodeIns As Integer = 45
Public Const MrdKeycodeDel As Integer = 46
Public Const MrdKeycodeWin As Integer = 92
Public Const MrdKeycodeF1 As Integer = 112 <\/em><\/span><\/p>\t\t\t\t\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t\t<\/div>\n\t\t<\/div>\n\t\t\t\t\t<\/div>\n\t\t<\/section>\n\t\t\t\t

\n\t\t\t\t\t\t
\n\t\t\t\t\t
\n\t\t\t
\n\t\t\t\t\t\t
\n\t\t\t\t
\n\t\t\t

Mettre une liste de valeurs en tableau<\/h2>\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t
\n\t\t\t\t
\n\t\t\t\t\t\t\t

Cette MRD fonction sert \u00e0 transformer une liste de valeurs en un tableau variant. Le nombre d’\u00e9l\u00e9ments de la liste est quelconque.

Function MetValeursEnTableau(ParamArray MesValeurs()) As Variant
\u00a0\u00a0 \u00a0Dim Toto()
\u00a0\u00a0 \u00a0ReDim Toto(0)
\u00a0\u00a0 \u00a0Dim Index As Integer
\u00a0\u00a0 \u00a0For Each X In MesValeurs
\u00a0\u00a0 \u00a0\u00a0\u00a0\u00a0 ReDim Preserve Toto(Index)
\u00a0\u00a0 \u00a0\u00a0\u00a0\u00a0 Toto(Index) = X
\u00a0\u00a0 \u00a0\u00a0\u00a0\u00a0 Inc Index
\u00a0\u00a0 \u00a0Next X
\u00a0\u00a0 \u00a0MetValeursEnTableau = Toto
End Function

<\/em><\/span>Elle s’utilise de la sorte:

\u00a0\u00a0 \u00a0Dim Toto as Variant
\u00a0\u00a0 \u00a0Toto = MetValeursEnTableau(\u00ab\u00a0Riri\u00a0\u00bb, \u00ab\u00a0Fifi\u00a0\u00bb, \u00ab\u00a0Loulou\u00a0\u00bb)

<\/em><\/span>Dans l’exemple pr\u00e9c\u00e9dent, on r\u00e9cup\u00e8re:

\u00a0\u00a0 \u00a0Toto(0)=\u00a0\u00bbRiri\u00a0\u00bb
\u00a0\u00a0 \u00a0Toto(1)=\u00a0\u00bbFifi\u00a0\u00bb
\u00a0\u00a0 \u00a0Toto(2)=\u00a0\u00bbLoulou\u00a0\u00bb <\/em><\/span><\/p>\t\t\t\t\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t\t<\/div>\n\t\t<\/div>\n\t\t\t\t\t<\/div>\n\t\t<\/section>\n\t\t\t\t

\n\t\t\t\t\t\t
\n\t\t\t\t\t
\n\t\t\t
\n\t\t\t\t\t\t
\n\t\t\t\t
\n\t\t\t

DateAdd<\/h2>\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t
\n\t\t\t\t
\n\t\t\t\t\t\t\t

Permet d’ajouter ou retirer des temps \u00e0 une date\/heure donn\u00e9e.
Ex:
‘ajoute un mois \u00e0 l’instant pr\u00e9sent.<\/em><\/span>
DateAdd(\u00ab\u00a0m\u00a0\u00bb, 1, now)<\/em><\/span><\/p>\t\t\t\t\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t\t<\/div>\n\t\t<\/div>\n\t\t\t\t\t<\/div>\n\t\t<\/section>\n\t\t\t\t

\n\t\t\t\t\t\t
\n\t\t\t\t\t
\n\t\t\t
\n\t\t\t\t\t\t
\n\t\t\t\t
\n\t\t\t

ExitWindowsEx<\/h2>\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t
\n\t\t\t\t
\n\t\t\t\t\t\t\t

Sert \u00e0 arr\u00eater le PC. J’ai cr\u00e9\u00e9 un programme qui se sert de cette fonction: ExtinctionPc.exe<\/em><\/p>\t\t\t\t\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t\t\t<\/div>\n\t\t<\/div>\n\t\t\t\t\t<\/div>\n\t\t<\/section>\n\t\t\t\t<\/div>\n\t\t","protected":false},"excerpt":{"rendered":"

File Scripting Object Files Description: Donne acc\u00e8s aux propri\u00e9t\u00e9s d’un fichier.Note: Le code suivant illustre l’obtention d’un objet File et l’affichage d’une de ses propri\u00e9t\u00e9s.Function ShowDateCreated(filespec)\u00a0\u00a0 \u00a0Dim fso, f\u00a0\u00a0 \u00a0Set fso = CreateObject(\u00ab\u00a0Scripting.FileSystemObject\u00a0\u00bb)\u00a0\u00a0 \u00a0Set f = fso.GetFile(filespec)\u00a0\u00a0 \u00a0ShowDateCreated = f.DateCreatedEnd Function Copy Description: Copie un fichier ou un dossier sp\u00e9cifi\u00e9 d’un emplacement vers un autre.Notes: […]<\/p>\n","protected":false},"author":1,"featured_media":0,"parent":0,"menu_order":0,"comment_status":"closed","ping_status":"closed","template":"","meta":{"ocean_post_layout":"","ocean_both_sidebars_style":"","ocean_both_sidebars_content_width":0,"ocean_both_sidebars_sidebars_width":0,"ocean_sidebar":"","ocean_second_sidebar":"","ocean_disable_margins":"enable","ocean_add_body_class":"","ocean_shortcode_before_top_bar":"","ocean_shortcode_after_top_bar":"","ocean_shortcode_before_header":"","ocean_shortcode_after_header":"","ocean_has_shortcode":"","ocean_shortcode_after_title":"","ocean_shortcode_before_footer_widgets":"","ocean_shortcode_after_footer_widgets":"","ocean_shortcode_before_footer_bottom":"","ocean_shortcode_after_footer_bottom":"","ocean_display_top_bar":"default","ocean_display_header":"default","ocean_header_style":"","ocean_center_header_left_menu":"","ocean_custom_header_template":"","ocean_custom_logo":0,"ocean_custom_retina_logo":0,"ocean_custom_logo_max_width":0,"ocean_custom_logo_tablet_max_width":0,"ocean_custom_logo_mobile_max_width":0,"ocean_custom_logo_max_height":0,"ocean_custom_logo_tablet_max_height":0,"ocean_custom_logo_mobile_max_height":0,"ocean_header_custom_menu":"","ocean_menu_typo_font_family":"","ocean_menu_typo_font_subset":"","ocean_menu_typo_font_size":0,"ocean_menu_typo_font_size_tablet":0,"ocean_menu_typo_font_size_mobile":0,"ocean_menu_typo_font_size_unit":"px","ocean_menu_typo_font_weight":"","ocean_menu_typo_font_weight_tablet":"","ocean_menu_typo_font_weight_mobile":"","ocean_menu_typo_transform":"","ocean_menu_typo_transform_tablet":"","ocean_menu_typo_transform_mobile":"","ocean_menu_typo_line_height":0,"ocean_menu_typo_line_height_tablet":0,"ocean_menu_typo_line_height_mobile":0,"ocean_menu_typo_line_height_unit":"","ocean_menu_typo_spacing":0,"ocean_menu_typo_spacing_tablet":0,"ocean_menu_typo_spacing_mobile":0,"ocean_menu_typo_spacing_unit":"","ocean_menu_link_color":"","ocean_menu_link_color_hover":"","ocean_menu_link_color_active":"","ocean_menu_link_background":"","ocean_menu_link_hover_background":"","ocean_menu_link_active_background":"","ocean_menu_social_links_bg":"","ocean_menu_social_hover_links_bg":"","ocean_menu_social_links_color":"","ocean_menu_social_hover_links_color":"","ocean_disable_title":"default","ocean_disable_heading":"default","ocean_post_title":"","ocean_post_subheading":"","ocean_post_title_style":"","ocean_post_title_background_color":"","ocean_post_title_background":0,"ocean_post_title_bg_image_position":"","ocean_post_title_bg_image_attachment":"","ocean_post_title_bg_image_repeat":"","ocean_post_title_bg_image_size":"","ocean_post_title_height":0,"ocean_post_title_bg_overlay":0.5,"ocean_post_title_bg_overlay_color":"","ocean_disable_breadcrumbs":"default","ocean_breadcrumbs_color":"","ocean_breadcrumbs_separator_color":"","ocean_breadcrumbs_links_color":"","ocean_breadcrumbs_links_hover_color":"","ocean_display_footer_widgets":"default","ocean_display_footer_bottom":"default","ocean_custom_footer_template":"","footnotes":""},"class_list":["post-299","page","type-page","status-publish","hentry","entry"],"_links":{"self":[{"href":"https:\/\/lesmrdtrucs.mataf35400.fr\/index.php\/wp-json\/wp\/v2\/pages\/299","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/lesmrdtrucs.mataf35400.fr\/index.php\/wp-json\/wp\/v2\/pages"}],"about":[{"href":"https:\/\/lesmrdtrucs.mataf35400.fr\/index.php\/wp-json\/wp\/v2\/types\/page"}],"author":[{"embeddable":true,"href":"https:\/\/lesmrdtrucs.mataf35400.fr\/index.php\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/lesmrdtrucs.mataf35400.fr\/index.php\/wp-json\/wp\/v2\/comments?post=299"}],"version-history":[{"count":19,"href":"https:\/\/lesmrdtrucs.mataf35400.fr\/index.php\/wp-json\/wp\/v2\/pages\/299\/revisions"}],"predecessor-version":[{"id":425,"href":"https:\/\/lesmrdtrucs.mataf35400.fr\/index.php\/wp-json\/wp\/v2\/pages\/299\/revisions\/425"}],"wp:attachment":[{"href":"https:\/\/lesmrdtrucs.mataf35400.fr\/index.php\/wp-json\/wp\/v2\/media?parent=299"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}