Любая возможность изменять тела sub и function, созданные с помощью VBA IDE

Как создать JSON, используя данные из базы данных MySQL

JSON (Обозначение объекта JavaScript) более предпочтительна в настоящее время по сравнению с XML, поскольку она легка, понятна и легко управляема для обмена данными на разных платформах. мы увидим, как данные JSON могут быть созданы из таблицы Employee, хранящейся в базе данных MySQL.

 echo json_encode($data);

Live: [Пример ]

0
задан FunThomas 4 March 2019 в 08:50
поделиться

1 ответ

Вам может потребоваться изменить коды для своих собственных нужд, но ниже приведена общая идея (например, замените «Module2» на название вашего модуля и включите дополнительные проверки, чтобы определить, куда добавлять новые коды)

Public Sub sub_test()
    Dim i As Long
    With ThisWorkbook.VBProject.VBComponents("Module2").CodeModule
        For i = 1 To .Countoflines
            If InStr(.Lines(i, 1), "End Sub") > 0 Then
                .Insertlines i, "**logging_successful = popCallFromStack(""sub a"")**"
            End If
        Next i
    End With
End Sub
0
ответ дан AiRiFiEd 4 March 2019 в 08:50
поделиться
Другие вопросы по тегам:

Похожие вопросы: