Page 1 sur 2

SQL

Publié : mar. 13/janv./2009 18:59
par Jagang
Bonjour
Voila je suis nouveau et je suis en train d'apprendre le Pure Basic (très bon langage au passage ^^)
Je voudrais faire un programme qui se connecte à une base de donné sur un site. Ensuite je voudrais pouvoir la lire/modifier avec du SQL.
J'ai vu que c'etait possible directement sur l'ordi ici. J'ai essayer de bidouiller mais ça marche pas pour une sur un site (le mien) :(

Quelqu'un sait faire ?

Merci d'avance
Cordialement
Jagang

PS: J'ai déjà des notions en Basic, en PHP et en Python ainsi qu'un tout petit peu en C/C++ (que je n'apprécie pas )

PS2: Je possède la version d'évaluation de PureBasic 4.30

Re: SQL

Publié : mar. 13/janv./2009 20:52
par lionel_om
Jagang a écrit :J'ai essayer de bidouiller mais ça marche pas pour une sur un site (le mien) :(
T'es chez Free ? si c'est ca ne cherche pas plus loin. Cherche ETNA, ca répondra a tes besoins. Le pb vient du fait que free n'autorise pas les cnx externes.

Si ca ne marche toujours pas, essaye avec un BDD en local (essaye avec Wamp par exemple) et si ca ne marche toujours pas, essaye avec des outils du genre MySQL Admin Tools (Query Browser, etc)

La version démo de PB ne va pas non plus aider le tout ! Si tu as les moyens fonce, tu ne le regretteras pas ;)

/Lio

Publié : mar. 13/janv./2009 20:56
par KarLKoX
C'est un problème côté herbergeur, celui-ci n'accepte pas les requêtes externes, sachant que tu es chez Free, il n'y aucune solution d'accès depuis l'exterieur.
Tu peux par contre interroger des pages php ;)

EDIT : j'avais aussi cherché Etna mais la page de l'auteur est hs :(

Publié : mar. 13/janv./2009 21:30
par Anonyme
Comme le dit KarLKoX , passe par des pages php , même avec un bon hébergement ( je suis chez 1&1) , les connections externes sont refusés , et heureusement :D

Publié : mar. 13/janv./2009 21:38
par Jagang
Comment passer par des page PHP ?
Je ne suis pas chez free je suis chez e3b

merci
cordialement
Jagang

Publié : mar. 13/janv./2009 21:53
par Anonyme
Tu connais le php avant de te lancer ?

le but , c'est via des pages php , tu lançes des requetes ( tu te connecte dessus en gros , tu passes des paramètres , tu les récupère avec $post , etc...)
et via echo tu affiches le résultat , tu télécharge en cache la page , tu n'a plus qu'a la parser.

Si tu connais pas le php & sql , apprends les en premier ( site du zéro)

@+

Publié : mar. 13/janv./2009 22:13
par Kwai chang caine
C'est qui ce TRIPAMORT ???? :roll:
C'est quinquin de la famille ???? :D

Publié : mar. 13/janv./2009 22:30
par lionel_om
KarLKoX a écrit :EDIT : j'avais aussi cherché Etna mais la page de l'auteur est hs :(
J'ai pas bcp recherché mais j'ai remis en ligne la dernière version que j'avais téléchargé : Etna (sans doute une version pour une des 1ere version de PB4), il est donc possible que ca ne marche pas...

/Lio

Publié : mar. 13/janv./2009 23:04
par Kwai chang caine
Bon ça y'ai !!!!!!!

KCC il a fouiné avec son petit groin de goret dans toute la page de TRIPAMORT.
Et il vient de trouver qui c'est ce celebre inconnu.....

C'est bien de la famille, ............c'est KAYNE :D

Bon m'reste plus qu'a enlever la terre de ma truffe rose, moi ...... :?

Image

Publié : mer. 14/janv./2009 14:20
par Jagang
Je connais le PHP et le SQL mais je ne sais pas comment faire pour charger ma page sans l'afficher et récuperé les données ...

merci
cordialement
jagang

Publié : mer. 14/janv./2009 15:05
par jbernard13

Publié : mer. 14/janv./2009 16:56
par Jagang
Merci mais c'est le même que j'ai mis dans mon premier poste et que je n'ai pas réussi a faire fonctionné comme je veux.
Cordialement
Jagang

Publié : mer. 14/janv./2009 17:29
par Anonyme
Lance avec le débuger :

Code : Tout sélectionner

InitNetwork()


Procedure.s OpenURL(Url.s, OpenType.b)
  isLoop.b = 1
  INET_RELOAD.l = $80000000
  hInet.l = 0 : hURL.l = 0 : Bytes.l = 0
  Buffer.s = Space(4096*100)
 
  hInet = InternetOpen_("PB@INET", OpenType, #Null, #Null, 0)
  hURL = InternetOpenUrl_(hInet, Url, #Null, 0, INET_RELOAD, 0)
 
  Repeat
   
    Delay(1)
    InternetReadFile_(hURL, @Buffer, Len(Buffer), @Bytes)
    If Bytes = 0
      isLoop = 0
    Else
      res.s = res + Left(Buffer, Bytes)
    EndIf
  Until isLoop = 0
  InternetCloseHandle_(hURL)
  InternetCloseHandle_(hInet)
  
  ProcedureReturn res
EndProcedure

#EOL = Chr(10)

Urls$ = OpenURL("http://www.purebasic.fr/french/viewtopic.php?t=8916", 1)

Global NewList Lignes.s()
  For i = 1 To Len(Urls$)
    Lettre.s = Mid(Urls$,i,1)
    Mot.s + Lettre
    
    If Lettre=#EOL
        AddElement(Lignes())
        Lignes() = Mot
        Mot=""
    EndIf 
    
  Next 


ForEach Lignes()
Debug "Line "+Str( ListIndex(Lignes()) )+" = "+Lignes() 
Next 

Publié : mer. 14/janv./2009 17:46
par Jagang
InternetOpen_()
InternetOpenUrl_()
InternetReadFile_()
InternetCloseHandle_()
InternetCloseHandle_()
Ne sont pas connu par le compilateur ...

Publié : mer. 14/janv./2009 18:29
par lionel_om
Jagang a écrit :
InternetOpen_()
InternetOpenUrl_()
InternetReadFile_()
InternetCloseHandle_()
InternetCloseHandle_()
Ne sont pas connu par le compilateur ...
Version démo...
/Lio