alberto-moyano 14-03-2025, 03:31
Hola gente, la consulta es la siguiente, estoy usando bastante la AI de DeepSeek para asistirme [1] y pensé en implementarlo en el formulario de mi aplicación, basicamente puse un webview (para ver la respuesta), un textarea (para usarlo como prompt), un textbox (para poner mi APIkey personal) y un boton (para enviar la consulta).
Lo primero que hice, fue preguntarle al propio DeepSeek si esto era posible y que limitaciones tengo. En la versión gratuita el limite está en la cantidad de tokens de los que se dispone, la cantidad que ofrece me alcanzan, ya que es lo que uso hoy y no tengo problemas.
Este es el código de una que me sugirio (tuve que agregar los componentes gb.webview y gb.net
Por supuesto, como es de esperar (ya anunciado por Shordi en algún hilo, por ahí) no funciona, pero la idea del proceso a desarrollar es clara.
Mi pregunta es si alguien del foro tiene experiencia (y tiempo) para explicar como funciona gb.net.
Saludos y gracias de antemano.
[1] en el proceso de edición de libros, utilizo DeepSeek para automatizar tareas, tales como hacer la traducción de diferentes metadatos que inyecto dentro de los libros a 3 idiomas (inglés, francés y portugues), otro uso muy repetido es que me busqué info faltante en las referencias bibliograficas y que me las pase directamente formateadas en biblatex.
Lo primero que hice, fue preguntarle al propio DeepSeek si esto era posible y que limitaciones tengo. En la versión gratuita el limite está en la cantidad de tokens de los que se dispone, la cantidad que ofrece me alcanzan, ya que es lo que uso hoy y no tengo problemas.
Este es el código de una que me sugirio (tuve que agregar los componentes gb.webview y gb.net
Código:
' En el evento Click del botón "Enviar"
Public Sub btnSENDai_Click()
' Obtén el texto del TextArea
Dim sPrompt As String = txtPROMPT.Text
' URL de la API de DeepSeek
Dim sUrl As String = "https://api.deepseek.com/v1/chat/completions"
' Tu clave de API de DeepSeek
Dim sApiKey As String = txtAPIKEY.Text
' Crea el JSON para la solicitud
Dim sJson As String = "{ \"model\": \"deepseek-chat\", \"messages\": [{\"role\": \"user\", \"content\": \"" & sPrompt & "\"}] }"
' Configura la solicitud HTTP
Dim hClient As NetClient
hClient = New NetClient As "NetClient"
' Configura los encabezados
hClient.RequestHeaders["Content-Type"] = "application/json"
hClient.RequestHeaders["Authorization"] = "Bearer " & sApiKey
' Envía la solicitud POST
hClient.Post(sUrl, sJson)
End
' En el evento Complete del NetClient
Public Sub hClient_Complete()
' Obtén la respuesta
Dim sResponse As String = hClient.ResponseText
' Parsea la respuesta JSON (puedes usar una librería JSON para esto)
Dim sMessage As String = ParseJsonResponse(sResponse)
' Muestra la respuesta en el componente WebKit
WebViewAI.Text = sMessage
End
' Función para parsear la respuesta JSON (ejemplo básico)
Public Function ParseJsonResponse(sJson As String) As String
' Aquí debes implementar la lógica para extraer el mensaje de la respuesta JSON
' Este es un ejemplo básico:
Dim sMessage As String
Dim iStart As Integer = InStr(sJson, "\"content\":\"") + 11
Dim iEnd As Integer = InStr(iStart, sJson, "\"")
If iStart > 0 And iEnd > 0 Then
sMessage = Mid(sJson, iStart, iEnd - iStart)
Else
sMessage = "Error: No se pudo parsear la respuesta JSON."
Endif
Return sMessage
EndPor supuesto, como es de esperar (ya anunciado por Shordi en algún hilo, por ahí) no funciona, pero la idea del proceso a desarrollar es clara.
Mi pregunta es si alguien del foro tiene experiencia (y tiempo) para explicar como funciona gb.net.
Saludos y gracias de antemano.
[1] en el proceso de edición de libros, utilizo DeepSeek para automatizar tareas, tales como hacer la traducción de diferentes metadatos que inyecto dentro de los libros a 3 idiomas (inglés, francés y portugues), otro uso muy repetido es que me busqué info faltante en las referencias bibliograficas y que me las pase directamente formateadas en biblatex.
tincho 12-03-2025, 18:42
Hola
Para subir una imagen en un post haz que hacer click en el recuadro de abajo que dice "imgur". Este se ve cuando se esta editando un mensaje z luego con vista previa se ve como quedaría el mensaje.
![[Imagen: wv65Ihel.png]](https://i.imgur.com/wv65Ihel.png)
Saludos.
Para subir una imagen en un post haz que hacer click en el recuadro de abajo que dice "imgur". Este se ve cuando se esta editando un mensaje z luego con vista previa se ve como quedaría el mensaje.
![[Imagen: wv65Ihel.png]](https://i.imgur.com/wv65Ihe.png)
Saludos.
Shell 12-03-2025, 16:59
Buenas!.
Lo cierto es que está diseñada para MySQL pero mediante los correspondientes scripts que se encuentra en la misma página de
GItHub se convierte a SQLITE el archivo SQL (mediante un script, en principio hecho en Python). Viene todo explicado, la estructura,
en que webs la usan (internamente), etc.
Prácticamente el tamaño es el mismo, ronda unos 136MB, nada más y nada menos.
Es una base que se actualiza cada x tiempo.
Ahora como estoy retomando un poco las bases de datos, la he vuelto actualizar. Tiene 74 tablas.
( No sé si esto sobrepasa los limites de Sqlite. Supongo que dependerá de las que tengas relacionadas, alguna característica).
Y me quedé con las ganas de saber, información sobre la propia base.
Por ejemplo, gráficamente. DB Browser for SQLite te dice las tablas que tiene.
Pero claro, imaginar que este tipo de información quieres saberlo desde una sentencia SQL
ó desde la propia terminal. Aja.
He usado el comando en la termina sqlite3 y he cargado la base de datos.
Luego con el comando ".help" te va mostrando las opciones de comando.
con .dbinfo me ha mostrado esto:
En parte son cosas que a lo mejor no haces directamente con sql, pero si con el propio comando sqlite3 desde la terminal.
Ah, la base, que memoria.
ZXDB
Referente a limites. Existe el comando .limit
Al entrarlo ha mostrado esto:
Saludos
Cita:ZXDB es una base de datos abierta que contiene información histórica de software, hardware, revistas y libros sobre ZX-Spectrum y máquinas relacionadas.
Lo cierto es que está diseñada para MySQL pero mediante los correspondientes scripts que se encuentra en la misma página de
GItHub se convierte a SQLITE el archivo SQL (mediante un script, en principio hecho en Python). Viene todo explicado, la estructura,
en que webs la usan (internamente), etc.
Prácticamente el tamaño es el mismo, ronda unos 136MB, nada más y nada menos.
Es una base que se actualiza cada x tiempo.
Ahora como estoy retomando un poco las bases de datos, la he vuelto actualizar. Tiene 74 tablas.
( No sé si esto sobrepasa los limites de Sqlite. Supongo que dependerá de las que tengas relacionadas, alguna característica).
Y me quedé con las ganas de saber, información sobre la propia base.
Por ejemplo, gráficamente. DB Browser for SQLite te dice las tablas que tiene.
Pero claro, imaginar que este tipo de información quieres saberlo desde una sentencia SQL
ó desde la propia terminal. Aja.
He usado el comando en la termina sqlite3 y he cargado la base de datos.
Luego con el comando ".help" te va mostrando las opciones de comando.
con .dbinfo me ha mostrado esto:
Cita:database page size: 4096
write format: 1
read format: 1
reserved bytes: 0
file change counter: 244
database page count: 33271
freelist page count: 0
schema cookie: 71
schema format: 4
default cache size: 0
autovacuum top root: 0
incremental vacuum: 0
text encoding: 1 (utf8)
user version: 0
application id: 0
software version: 3044001
number of tables: 71
number of indexes: 120
number of triggers: 0
number of views: 0
schema size: 40259
data version 1
En parte son cosas que a lo mejor no haces directamente con sql, pero si con el propio comando sqlite3 desde la terminal.
Ah, la base, que memoria.
ZXDB
Referente a limites. Existe el comando .limit
Cita:.limit ?LIMIT? ?VAL? Display or change the value of an SQLITE_LIMIT
Al entrarlo ha mostrado esto:
Cita: length 1000000000
sql_length 1000000000
column 2000
expr_depth 1000
compound_select 500
vdbe_op 250000000
function_arg 127
attached 10
like_pattern_length 50000
variable_number 250000
trigger_depth 1000
worker_threads 0
Saludos
Bienvenido, Invitado
Últimos temas
Paren...WAIT !!!
Foro: Aplicaciones/Fragmentos de CódigoÚltimo mensaje por: guizans, 25-08-2025, 14:49
Respuestas: 3 - Vistas: 267
Gambas y Wayland
Foro: GeneralÚltimo mensaje por: guizans, 20-08-2025, 13:56
Respuestas: 6 - Vistas: 383
Odio a gb.Report
Foro: GeneralÚltimo mensaje por: guizans, 19-08-2025, 10:40
Respuestas: 8 - Vistas: 718
Devorado por la malvada s...
Foro: PythonÚltimo mensaje por: tercoide, 12-08-2025, 23:58
Respuestas: 6 - Vistas: 487