Foros del web, para los que viven de bits

txels · 08-abr-2008, 03:32

Hola buenas!!
Quería saber si hay algun modo de mostrar los nombres de todas las bases de datos en un servidor MySql, por supuesto tengo permisos de root...se que en php se puede hacer, y en ASP como sería?

Shiryu_Libra · 08-abr-2008, 13:30

podrias poner tu codigo de php que usas para enlistar las bases de datos, a lo mejor con un poco de brujeria se puede convertir en ASP

txels · 09-abr-2008, 08:38

La brujeria ya la he intentado utilizar...y no ha resultado...te recomiendo que leas mi post despacito, pongo que "SE" que se puede hacer, porque lo he visto funcionando...no que yo tenga ese codigo, descartada la brujería,

Alguien que tenga algo, aunque sea poco, que aportar? alguna solucion? venga...eso se tiene que poder hacer!

Shiryu_Libra · 09-abr-2008, 09:13

hombre... no se desanime... la brujeria es buena...

haz mirado este post en la biblioteca de clases, funciones y subrutinas?
de lo cual podremos rescatar este pequeño codigo

Código PHP:


			
<!-- #INCLUDE File="adovbs.inc" -->
<script runat=server LANGUAGE="VBSCRIPT">
  Dim oConn,rstSchema
  Set oConn = Server.CreateObject("ADODB.Connection")
  Set rstSchema = Server.createobject("ADODB.Recordset")
  oConn.Open ("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("rebe_pad.mdb"))
  Set rstSchema = oConn.OpenSchema(adSchemaTables)
    response.write "<table>"
  Do Until rstSchema.EOF
     Response.Write "<tr><td>Tabla: " & rstSchema("TABLE_NAME")
     Response.Write "<td>Tipo: " & rstSchema("TABLE_TYPE")
     rstSchema.MoveNext
  Loop
  rstSchema.Close 
  oConn.Close
</script>

este codigo despliega las tablas que contiene una base de datos

si llegases a encontrar el codigo para desplegar con php, postealo, veremos como podemos realizar la brujeria

Al Zuwaga · 09-abr-2008, 13:07

Se me ocurre algo que tal vez no sea lo mejor, pero es algo al fin

Usar FSO para revisar las carpetas contenidas dentro de la ruta "<<instalación-de-mysql>>/mysql/data/"

Shiryu_Libra · 09-abr-2008, 14:14

en ese caso...

Código PHP:


			
<%
on error resume next
response.Buffer=true
pa="http://"&_
Request.ServerVariables("SERVER_NAME")&"/mysql/data/"
response.Write pa
nombre_carpeta = pa
response.write "<h1>-" & nombre_carpeta & "</h1>"

'Conecto con el sistema de archivos
set FSO = server.createObject("Scripting.FileSystemObject")

'creo el objeto carpeta
Set carpeta = FSO.GetFolder(nombre_carpeta)

'traigo los archivos de la carpeta
Set archivos = carpeta.Files
'para cada archivo, muestro su nombre.
response.Write "<h2>ROOT</h2>"
for each nombre_archivo in archivos
    tipo_archivo=GetExtensionName(nombre_archivo)
    response.Write "<br>" & tipo_archivo
    response.Write "<br>" & nombre_archivo
next
%>

a lo mejor te sirve

Al Zuwaga · 09-abr-2008, 15:47

Hola Shiryu. No creo que se pueda acceder al FileSystemObject con una ruta virtual del tipo http://127.0.0.1/carpeta/

Yo me refería a algo así:

Código:

<%
path_A_MI_INSTALACION_DE_mysql = "C:\Archivos de programa\EasyPHP1-8\mysql\data\"
set FSO = server.createObject("Scripting.FileSystemObject")
Set carpeta_data = FSO.GetFolder(path_A_MI_INSTALACION_DE_mysql)
Set bases = carpeta_data.SubFolders
for each base in bases
	ultimo_slash = InStrRev(base, "\")
	nombre_bd = Mid(base, ultimo_slash + 1, len(base) - ultimo_slash)
	if LCase(nombre_bd) = "mysql" then nombre_bd = "<em>" & nombre_bd & "</em> (base de datos de sistema)"
	response.write nombre_bd & "<br />"
next
%>

Un saludo

Shiryu_Libra · 09-abr-2008, 15:54

Bravooo!!

Bravo!!!

god one Master

Alert · 09-abr-2008, 22:06

Bueno haber si te sirve esto ... es el similar al phpadmin digamos , pero en asp obvio ...
en este link esta el ejemplo para descargar. esta en fase Beta ... pero tiene muy buena pinta

Espero que te sirva el link ... bueno en realidad a todo aquel que busque lo mismo.

txels · 15-abr-2008, 03:35

Muchas graaaaacias alert!

puf...lo de recorrer la carpeta de bases de datos me da un poco de yuyu...eso no os parece que implicaría una falla de seguridad?

habrá que seguir investigando...nadia a tenido necesidad de hacer esto nunca? soy el primero?

Salu2

08-abr-2008, 03:32	#1 (permalink)
txels Fecha de Ingreso: mayo-2005 Mensajes: 74	Nombre de las bases de datos servidor Mysql Hola buenas!! Quería saber si hay algun modo de mostrar los nombres de todas las bases de datos en un servidor MySql, por supuesto tengo permisos de root...se que en php se puede hacer, y en ASP como sería?

08-abr-2008, 13:30	#2 (permalink)
Shiryu_Libra Colaborador Fecha de Ingreso: febrero-2007 Ubicación: Localhost/Pruebas.... Mensajes: 2.597	Re: Nombre de las bases de datos servidor Mysql podrias poner tu codigo de php que usas para enlistar las bases de datos, a lo mejor con un poco de brujeria se puede convertir en ASP __________________ "Eres parte del problema, parte de la solucion o parte del paisaje" Un Saludo desde Desierto de Altar, Sonora, MX. Shiryu_libra

09-abr-2008, 08:38	#3 (permalink)
txels Fecha de Ingreso: mayo-2005 Mensajes: 74	Re: Nombre de las bases de datos servidor Mysql La brujeria ya la he intentado utilizar...y no ha resultado...te recomiendo que leas mi post despacito, pongo que "SE" que se puede hacer, porque lo he visto funcionando...no que yo tenga ese codigo, descartada la brujería, Alguien que tenga algo, aunque sea poco, que aportar? alguna solucion? venga...eso se tiene que poder hacer!

09-abr-2008, 09:13	#4 (permalink)
Shiryu_Libra Colaborador Fecha de Ingreso: febrero-2007 Ubicación: Localhost/Pruebas.... Mensajes: 2.597	Re: Nombre de las bases de datos servidor Mysql hombre... no se desanime... la brujeria es buena... haz mirado este post en la biblioteca de clases, funciones y subrutinas? de lo cual podremos rescatar este pequeño codigo Código PHP: <!-- #INCLUDE File="adovbs.inc" --> <script runat=server LANGUAGE="VBSCRIPT"> Dim oConn,rstSchema Set oConn = Server.CreateObject("ADODB.Connection") Set rstSchema = Server.createobject("ADODB.Recordset") oConn.Open ("DRIVER={Microsoft Access Driver (.mdb)}; DBQ=" & Server.MapPath("rebe_pad.mdb")) Set rstSchema = oConn.OpenSchema(adSchemaTables) response.write "<table>" Do Until rstSchema.EOF Response.Write "<tr><td>Tabla: " & rstSchema("TABLE_NAME") Response.Write "<td>Tipo: " & rstSchema("TABLE_TYPE") rstSchema.MoveNext Loop rstSchema.Close oConn.Close </script> este codigo despliega las tablas que contiene una base de datos si llegases a encontrar el codigo para desplegar con php, postealo, veremos como podemos realizar la brujeria __________________ "Eres parte del problema, parte de la solucion o parte del paisaje" Un Saludo desde Desierto de Altar, Sonora, MX. Shiryu_libra*

09-abr-2008, 13:07	#5 (permalink)
Al Zuwaga Moderador Fecha de Ingreso: noviembre-2002 Ubicación: 34.517 S, 58.500 O Mensajes: 12.188	Re: Nombre de las bases de datos servidor Mysql Se me ocurre algo que tal vez no sea lo mejor, pero es algo al fin Usar FSO para revisar las carpetas contenidas dentro de la ruta "<<instalación-de-mysql>>/mysql/data/" __________________ ···---···

09-abr-2008, 14:14	#6 (permalink)
Shiryu_Libra Colaborador Fecha de Ingreso: febrero-2007 Ubicación: Localhost/Pruebas.... Mensajes: 2.597	Re: Nombre de las bases de datos servidor Mysql en ese caso... Código PHP: <% on error resume next response.Buffer=true pa="http://"&_ Request.ServerVariables("SERVER_NAME")&"/mysql/data/" response.Write pa nombre_carpeta = pa response.write "<h1>-" & nombre_carpeta & "</h1>" 'Conecto con el sistema de archivos set FSO = server.createObject("Scripting.FileSystemObject") 'creo el objeto carpeta Set carpeta = FSO.GetFolder(nombre_carpeta) 'traigo los archivos de la carpeta Set archivos = carpeta.Files 'para cada archivo, muestro su nombre. response.Write "<h2>ROOT</h2>" for each nombre_archivo in archivos tipo_archivo=GetExtensionName(nombre_archivo) response.Write "<br>" & tipo_archivo response.Write "<br>" & nombre_archivo next %> a lo mejor te sirve __________________ "Eres parte del problema, parte de la solucion o parte del paisaje" Un Saludo desde Desierto de Altar, Sonora, MX. Shiryu_libra

09-abr-2008, 15:54	#8 (permalink)
Shiryu_Libra Colaborador Fecha de Ingreso: febrero-2007 Ubicación: Localhost/Pruebas.... Mensajes: 2.597	Re: Nombre de las bases de datos servidor Mysql Bravooo!! Bravo!!! god one Master __________________ "Eres parte del problema, parte de la solucion o parte del paisaje" Un Saludo desde Desierto de Altar, Sonora, MX. Shiryu_libra

09-abr-2008, 22:06	#9 (permalink)
Alert Fecha de Ingreso: junio-2004 Mensajes: 64	Re: Nombre de las bases de datos servidor Mysql Bueno haber si te sirve esto ... es el similar al phpadmin digamos , pero en asp obvio ... en este link esta el ejemplo para descargar. esta en fase Beta ... pero tiene muy buena pinta Espero que te sirva el link ... bueno en realidad a todo aquel que busque lo mismo.

15-abr-2008, 03:35	#10 (permalink)
txels Fecha de Ingreso: mayo-2005 Mensajes: 74	Re: Nombre de las bases de datos servidor Mysql Muchas graaaaacias alert! puf...lo de recorrer la carpeta de bases de datos me da un poco de yuyu...eso no os parece que implicaría una falla de seguridad? habrá que seguir investigando...nadia a tenido necesidad de hacer esto nunca? soy el primero? Salu2

Herramientas
Mostrar Versión Imprimible Enviar por Correo
Desplegado
Mode Lineal Cambiar a Modo Hibrido Cambiar a Modo Hilado