VB Skype Resolver Problema

Stato
Discussione chiusa ad ulteriori risposte.

Mistery?

Utente Silver
25 Luglio 2015
69
8
8
56
img


Salve, il codice che vedete sopra sarebbe il resolver del mio SkypeBOT.
Naturalmente Quando Scrivo in chat skype: #Resolve + Nome non va, mentre se scrivo #Resolve Mi scarica la stringa di errore dell'api.

Ecco la variabile Utente:

Dim Utente As a String

Aiutatemi gentilmente
 
Ultima modifica:
A me si vede, questo è il link: http://prntscr.com/7wudo7
Leva quel WebRequest.Create :oddio:
La variabile 'Utente' non serve a niente per il tuo caso.
Devi splittare la stringa, per ottenere l'username skype che sceglie l'utente.
Usa Select Case.
Guarda un pò:
Codice:
dim sArray() as string = split(messaggio, " ") ' vettore di stringhe
select case lcase(sArray(0)) ' usa la funzione lcase
case "#resolve"
c.sendmessage("Risultato Skype resolver: " & client.downloadstring("api/?args=" & sArray(1)))
case "#attack"
c.sendmessage("target: " & sArray(1) & " ~ port: " & sArray(2)) 'altro semplice esempio
end select
Adesso prova a scrivere al bot: #resolve [skypeusername]
In caso posta tutto il codice per favore.
PS: Devi definire il webclient a livello globale nella tua classe.
 
  • Mi piace
Reazioni: Mistery?
Stato
Discussione chiusa ad ulteriori risposte.