<?xml version="1.0" encoding="UTF-8"?>
<rss version="2.0"><channel><category>pcsoft.us.windev</category><copyright>Copyright 2026, PC SOFT</copyright><lastBuildDate>11 Sep 2018 10:09:23 Z</lastBuildDate><pubDate>11 Sep 2018 10:09:23 Z</pubDate><description>Hello everyone,&#13;
&#13;
I'm trying desperately to log on to the following website but it does not work: http://www.drawinflation.com/user&#13;
Sending the form seems to work, but when I visit another page (http://www.drawinflation.com/user/3979), I always get the same "Forbidden" message.&#13;
&#13;
The username and password are correct, they work when I enter them directly into the site, but via Windev it does not work. Here is my code below, if someone could tell me where the problem is, I would appreciate it a lot.&#13;
&#13;
Thank you.&#13;
&#13;
[code:wl]&#13;
i, j are int&#13;
bExist is a boolean&#13;
bConnect is a boolean&#13;
bufResHttp is a Buffer&#13;
sform_build_id is a string&#13;
sCh1 is a string&#13;
&#13;
HTTPRequest("http://www.drawinflation.com/user")&#13;
sCh1=HTTPGetResult(httpResult)&#13;
i=Position(sCh1,"form_build_id")&#13;
IF i&gt;0 THEN&#13;
	i=Position(sCh1,"=",i)+1&#13;
	j=Position(sCh1,"/",i)	&#13;
	sform_build_id=StringDelete(NoSpace(Milieu(sCh1,i,j-i),sscAll),"""")&#13;
ELSE&#13;
	Error("Impossible to login!")&#13;
	RETURN&#13;
END&#13;
&#13;
HTTPCreateForm("user-login")&#13;
HTTPAddParameter("user-login", "name", "****")&#13;
HTTPAddParameter("user-login", "pass", "****")&#13;
HTTPAddParameter("user-login", "form_build_id", sform_build_id)&#13;
HTTPAddParameter("user-login", "form_id", "user_login")&#13;
HTTPAddParameter("user-login", "op", "Log+in")&#13;
bExist=HTTPSendForm("user-login", "http://www.drawinflation.com/user",httpPost)&#13;
&#13;
Multitask(-1)&#13;
&#13;
IF bExist THEN&#13;
	HTTPRequest("http://www.drawinflation.com/user/3979")&#13;
	bufResHttp = HTTPGetResult(httpHeader)&#13;
	IF Length(bufResHttp)&gt;0 THEN&#13;
		IF Position(bufResHttp,"Forbidden")=0 AND Position(bufResHttp,"ACCESS DENIED")=0 THEN&#13;
			bConnect=True&#13;
		END&#13;
	END&#13;
END&#13;
&#13;
IF bConnect=False THEN&#13;
	Error("Unrecognized DI username or password!")&#13;
	RETURN&#13;
END&#13;
[/code]</description><ttl>30</ttl><generator>WEBDEV</generator><language>en_US</language><link>https://forum.pcsoft.fr/es-ES/pcsoft.us.windev/66837-problem-when-trying-log-website/read.awp</link><title>Problem when trying to log on to a website</title><managingEditor>moderateur@pcsoft.fr (El moderador)</managingEditor><webMaster>webmaster@pcsoft.fr (El webmaster)</webMaster></channel></rss>
