1. Bonjour tout le monde ! Veillez consulter la Politique de forum pour comprendre nos règles, Merci a vous !
    Rejeter la notice

How to inetrface with ChatGPT AI with windev

Discussion dans 'Windev' créé par sanyad, Mar 30, 2023.

  1. sanyad

    sanyad Member

    Inscrit:
    Sept 27, 2019
    Messages:
    176
    J'aime reçus:
    7
    Hello friends, I am using Windev25 and require assistance in developing a utility that can interface API calls from windev to ChatGPT AI. Specifically, I need help in rewriting some English documents. I am looking for someone who can provide insight on whether windev has been used to interface with ChatGPT, and any code snippets would be greatly appreciated. Thank you.
     
    Tags:
  2. Gemini1961

    Gemini1961 Well-Known Member
    MEMBRE WX DUMP TEAM

    Inscrit:
    Jan 2, 2018
    Messages:
    578
    J'aime reçus:
    867
    Bonsoir Sanyad
    Après m'être amusé avec les API ChatGPT et testé le code généré ...
    Je peux te dire que cela est loin, je dirais même très loin d'être au point :;)
    Le code est un pseudo Python francisé...
    Bien cordialement
     
  3. sanyad

    sanyad Member

    Inscrit:
    Sept 27, 2019
    Messages:
    176
    J'aime reçus:
    7
    Dear friends, i have got following code from some webpage :

    [windev]

    PROCEDURE EnviarMensagem(Questao is string)
    HourGlass(True)
    IF Questao = "" THEN

    Info("Importante informar uma pergunta?")

    RESULT False

    ELSE

    MyRequest is httpRequest

    url is string = "

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    "

    sua_chave_de_api is string = "your chatgpt API key"

    Pergunta is string = [
    {
    "model": "text-davinci-003",
    "prompt": "[%Questao%]",
    "max_tokens": 4097,
    "temperature": 0.5
    }
    ]


    MyRequest..URL = url

    MyRequest..Content = Pergunta

    MyRequest..Timeout = 280s

    MyRequest.ContentType = "application/json"

    MyRequest..Header["Authorization"] = "Bearer "+sua_chave_de_api

    MyRequest..Method = httpPost

    MyRequest..IgnoreError = httpIgnoreInvalidCertificate

    MyResponse is httpResponse = HTTPSend(MyRequest)

    IF MyResponse..StatusCode = 200 THEN

    vRetorno is Variant

    vRetorno = JSONToVariant(MyResponse..Content)

    resultado is string

    resultado = Replace(vRetorno.choices[1].text,".",".<br><br>")

    resultado = [
    <FONT FACE=Arial COLOR="

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    ">
    [%resultado%]
    </FONT>
    ]

    HourGlass(False)

    //LOG

    t001_chatgpt = resultado


    RESULT resultado

    ELSE

    HourGlass(False)

    RESULT ErrorInfo() +" - "+ HErrorInfo()

    END

    END

    [/windev]


    I am calling the code by

    EnviarMensagem (EDT_NoName1.Text)

    It is working for some CHatGPT queries but not working for rewriting large bunch of text...

    Any help would be appreciated.
     
  4. Gemini1961

    Gemini1961 Well-Known Member
    MEMBRE WX DUMP TEAM

    Inscrit:
    Jan 2, 2018
    Messages:
    578
    J'aime reçus:
    867
    Bonsoir
    Cela confirme ma réponse écrite plus haut:)
    Si je peux me permettre de vous donner un conseil ;
    Ne perdez pas votre temps sur ChatGPT et apprenez d'abord par suivre le guide d'auto-formation WD ;-)
    Ceci dit, je me retire de la discussion ...
    Bien cordialement
     
    suenodesign apprécie ceci.
  5. suenodesign

    suenodesign Well-Known Member
    MEMBRE WX

    Inscrit:
    Jan 1, 2018
    Messages:
    509
    J'aime reçus:
    739
    Bonsoir,

    ça pourrait t'aider.

    ChatGPT - windev 25

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!



    Exemplo windev consumindo Api do ChatGpt com Wlanguage, pode ser usado no webdev e no mobile o mesmo código

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!



    @

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!


    Suivez le conseil de @

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

     
    sanyad et Gemini1961 aiment ça.
  6. sanyad

    sanyad Member

    Inscrit:
    Sept 27, 2019
    Messages:
    176
    J'aime reçus:
    7

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    Bonsoir,

    ça pourrait t'aider.

    ChatGPT - windev 25

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!



    Exemplo windev consumindo Api do ChatGpt com Wlanguage, pode ser usado no webdev e no mobile o mesmo código

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!



    @

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!


    Suivez le conseil de @

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    Cliquez pour agrandir...
    Thanks. Your help is appreciatd. My query has been resolved.
     
  • sanyad

    sanyad Member

    Inscrit:
    Sept 27, 2019
    Messages:
    176
    J'aime reçus:
    7
    Thanks it is working but for some results which are html based, the output is not as expected showing html syntax. Is there any way to prevent that?
    [​IMG]
    [​IMG]
     
  • Partager cette page

    Chargement...