últimos mensajes de: oskarrr

Mostrar Mensajes
Páginas: [1]

1	Programación / Programación Visual Basic / Re: Problemas para acortar rutas largas	en: 15 Junio 2013, 16:14 pm
mmm, no sabía lo de las comillas. Me daba problemas con las rutas con espacios a la hora de llamar shell en vb6 y por eso comencé a usar la función para acortar las rutas, y funciona perfecto siempre que no sean rutas de red. Tendré que hacer pruebas con las comillas a ver que tal. El programa lo estoy usando con versiones de windows en XP, Vista, Windows 7... Supongo que cuando te refieres a versiones antiguas de windows te refieres a versiones por lo menos anteriores a XP. Saludos.

2	Programación / Programación Visual Basic / Problemas para acortar rutas largas	en: 15 Junio 2013, 01:44 am
Hola. Estoy usando el siguiente código para acortar rutas largas tipo C:\Archivos de Programa y convertirlas en C:\Archiv~1 para usar comandos en ventana de comandos sin errores. Código: Código Public Function AcortarPath(Ruta As String) As String Dim sBuf As String * 260 Dim i As Long i = GetShortPathName(Ruta, sBuf, Len(sBuf)) AcortarPath = Left$(sBuf, i) End Function El código funciona perfectamente para acortar rutas tipo "C:\Archivos de Programa\Mi programa y mi ruta con espacios", pero no hace nada cuando intento convertir rutas en red tipo "\\mi disco en red\mi carpeta con nombre largo y espacios". ¿Alguna ayuda?

Programación / Programación Visual Basic / Pasar datos a web con webbrowser en tiempo de ejecución (no hay manera)

en: 11 Septiembre 2012, 16:47 pm

Hola. Aprovecho para presentarme aunque llevos unos añitos registrado. Quiero rellenar unos campos en tiempo de ejecución en una web, concretamente usuario, password, y darle clic al login. El clic al login y el campo de password me funcionan bien, pero al intentarle meter texto al campo login me da el error 438 de que no admite ese método o propiedad. Yo pienso que es porque el form (de la web) se llama login y el input text de la web también se llama login.

Este es el código html (resumido):

Código:

<form method="post" action="login.phtml" name="login" style="display:inline"><div style="float:left;">
			<div style="float:left;">
				<div style="float:left;line-height:8px;"><div class="icon mi mi_manager" style="float:left;"></div><p style="float:left;margin:0;padding:0;line-height:8px;padding-top:1px;">Usuario:&nbsp;</p><br /></div>
                                <div style="float:left;">
                                <input type="text" name="login" size="10" maxlength="10" class="userlogin" tabindex="1" style="margin-left:5px;margin-top:4px;" />
                                </div>
			</div>
			<div style="float:left;">
				<div style="float:left;line-height:8px;"><div class="icon i_lock" style="float:left; margin-left:5px; margin-right:4px;"></div><p style="float:left;margin:0;padding:0;line-height:10px;padding-top:1px;">Contraseña:&nbsp;</p><br /></div>
                                <div style="float:left;">
                                <input type="password" name="pass" size="10" maxlength="8" style="width:80px;margin-left:5px;margin-top:4px;" tabindex="2" onkeypress="checkEnter(event, 'login')" class="userlogin" />
                                </div>
		        </div><input type="hidden" name="action" value="login" />

Y este es mi código en VB6:

Código:

Private Sub Form_Load()
    WebBrowser1.Navigate "http://miweb.com/login"
End Sub

Private Sub Command1_Click()
    WebBrowser1.Document.All("login").Value = "pepito" 'aquí falla
    WebBrowser1.Document.All("pass").Value = "12345" 'funciona ok
    WebBrowser1.Document.parentWindow.execScript "submitForm('login','Login')", "javascript" 'funciona ok
End Sub

Páginas: [1]