Ya tenemos las funciones para crear automáticamente los códigos del Modelo/Vista/Controlador para PHP ahora lo que sigue es crear los archivos en el directorio del directorio del proyecto en PHP
Para guardar archivo en Gambas3 usaremos la función File.Save(“ruta donde se va a guardar”,”contenido del archivo”)
Pasos


Insertamos en ese evento el siguiente código
Dim strModel1 As String
Dim strControlador As String
Dim strVista As String
' GUARDAR CONFIGURACION
Settings["ruta"] = ruta.SelectedPath
Settings["tabla"] = txtTabla.Text
' CREA ARCHIVO DEL MODELO
strModel1 = creadorModelo.creaModelo()
File.Save(ruta.SelectedPath & "/" & "modelos/" & txtTabla.Text & ".modelo.php", strModel1)
' CREA ARCHIVO DEL CONTROLADOR
strControlador = creadorControlador.creaControlador()
File.Save(ruta.SelectedPath & "/" & "controladores/" & txtTabla.Text & ".controlador.php", strControlador)
' CREA ARCHIVO VISTA
strVista = creadorVista.creaVista()
File.Save(ruta.SelectedPath & "/" & "vistas/modulos/" & txtTabla.Text & ".php", strVista)
' MANDAMOS MENSAJE DE QUE TODO SE HA GUARDADO CORRECTAMENTE
Message.Info("Guardado Correctamente")

Luego guarda con File.Save en la ruta que seleccionamos con el control llamado “ruta” el texto que esta en strModel
Esta misma lógica se usa para el controlador y la vista
En la siguiente publicación veremos como asignarle un icono al proyecto
Deja un comentario