[vb] opdracht tot uitlezen

Pagina: 1
Acties:

  • vriesdude
  • Registratie: Februari 2002
  • Laatst online: 01-09 11:49
ik ben nog vrij onbekend met Vsual Basic,
en ik vroeg me af of ik met VB een bestand kan uitlezen op het internet

er moet dus eigenlijk een link gemaakt worden tussen het VB-script en een php file op het net.

In hoe verre zou dit mogelijk zijn.

edit: stomme typo

/dev/null


  • mulder
  • Registratie: Augustus 2001
  • Laatst online: 31-08 15:46

mulder

ik spuug op het trottoir

visual basic

Ik weet niet hoever dit mogelijk is met VB-script, met VB zelf zul je een componentje (winsock?) een request naar die page moeten doen. Misschien staan op www.planetsourcecode.com wat voorbeelden

oogjes open, snaveltjes dicht


  • vriesdude
  • Registratie: Februari 2002
  • Laatst online: 01-09 11:49
ik zal ff rondkijken op dit site
ik ben brij onbekend met visual basic,
dus ik denk dat dat met dat componentje niet veel wordt

zal ik half jaar moeten wachten, dan krijg ik vb op school :P

/dev/null


  • robjanssen
  • Registratie: September 2001
  • Laatst online: 02-08 16:10

robjanssen

Software Developer

Of met het Browser component.
Dan kun je de broncode op een bestand opvragen.
Of is dat niet de bedoeling?

  • vriesdude
  • Registratie: Februari 2002
  • Laatst online: 01-09 11:49
robjanssen schreef op 09 september 2002 @ 22:11:
Of met het Browser component.
Dan kun je de broncode op een bestand opvragen.
Of is dat niet de bedoeling?
juist niet,
het is de bedoelding dat ik een php script wat gegevens laat verzamelen
en deze uit laat spuwen op het scherm

dus als ik vb dat laat lezen, dat ie de uitgespuwde gegevens verzamel.

/dev/null


  • ParaNoiMia
  • Registratie: Mei 2000
  • Laatst online: 30-08 18:07
simpel, gebruik het ASP tear component. Die geeft je een string terug met de inhoud van de html die je php pagina uitspuugt.

http://www.alphasierrapapa.com/IisDev/Components/AspTear/

  • Nazgul
  • Registratie: Februari 2000
  • Laatst online: 11-10-2022

Nazgul

Digital Pizza Crew

Kijk anders ook even naar het WinSock control.

No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced.


Verwijderd

Visual Basic .NET:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
Private Sub StripCode()
' code behind button for example
Dim i
Dim Y
Dim j
Dim u

DoEvents
Dim h
' Option Buttons to select or Print or Echo as output in Text1 on a form
If Option1.Value = False Then h = "echo "
If Option2.Value = False Then h = "print "
For i = 1 To Len(Text1.Text)
If Mid(Text1.Text, i, 1) = Chr(34) Then
j = j & "\"""
Else
j = j & Mid(Text1.Text, i, 1)
End If

Next


 u = h & Chr(34)
 For Y = 1 To Len(j)
 If Mid(j, Y, 1) = Chr(13) And Mid(j, Y + 1, 1) = Chr(10) Then
u = u & "\n" & Chr(34) & Chr(59) & Chr(13) & Chr(10) & h & Chr(34)
Y = Y + 1
Else
u = u & Mid(j, Y, 1)
End If

Next
u = u & "\n" & Chr(34) & Chr(59)
Text1.Text = u
VB.Clipboard.SetText Text1.Text

End Sub

  • vriesdude
  • Registratie: Februari 2002
  • Laatst online: 01-09 11:49
Verwijderd schreef op 09 september 2002 @ 23:15:
Visual Basic .NET:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
Private Sub StripCode()
' code behind button for example
Dim i
Dim Y
Dim j
Dim u

DoEvents
Dim h
' Option Buttons to select or Print or Echo as output in Text1 on a form
If Option1.Value = False Then h = "echo "
If Option2.Value = False Then h = "print "
For i = 1 To Len(Text1.Text)
If Mid(Text1.Text, i, 1) = Chr(34) Then
j = j & "\"""
Else
j = j & Mid(Text1.Text, i, 1)
End If

Next


 u = h & Chr(34)
 For Y = 1 To Len(j)
 If Mid(j, Y, 1) = Chr(13) And Mid(j, Y + 1, 1) = Chr(10) Then
u = u & "\n" & Chr(34) & Chr(59) & Chr(13) & Chr(10) & h & Chr(34)
Y = Y + 1
Else
u = u & Mid(j, Y, 1)
End If

Next
u = u & "\n" & Chr(34) & Chr(59)
Text1.Text = u
VB.Clipboard.SetText Text1.Text

End Sub
hoe moet ik deze code precies gebruiken,
waar moet ik invullen wat ie uitleest
?

/dev/null


  • Sponge
  • Registratie: Januari 2002
  • Laatst online: 28-08 17:06

Sponge

Serious Game Developer

Heeft niets met internet te maken..

Check www.pscode.com op en zoek op "transfer control", FTP, file transfer oid..

  • vriesdude
  • Registratie: Februari 2002
  • Laatst online: 01-09 11:49
Don Facundo schreef op 09 september 2002 @ 21:41:
visual basic

Ik weet niet hoever dit mogelijk is met VB-script, met VB zelf zul je een componentje (winsock?) een request naar die page moeten doen. Misschien staan op www.planetsourcecode.com wat voorbeelden
in dit geval kan ik alleen vbscript en dll bestanden gebruiken..
ohh wat een puinhoop 8)7
41.6C.6D.61.72 schreef op 10 september 2002 @ 18:29:
Heeft niets met internet te maken..

Check www.pscode.com op en zoek op "transfer control", FTP, file transfer oid..
fijn dat de search daar zo goed werkt :P

/dev/null


Verwijderd

vriesdude schreef op 09 september 2002 @ 22:18:
[...]


juist niet,
het is de bedoelding dat ik een php script wat gegevens laat verzamelen
en deze uit laat spuwen op het scherm

dus als ik vb dat laat lezen, dat ie de uitgespuwde gegevens verzamel.
Dus als ik het goed begrijp wil je met PHP wat gegevens verzamelen, deze in een html file (of iets dergelijks) zetten en die downloaden/uitlezen met visual basic? Of begrijp ik het nu verkeerd? :?

[ Voor 0% gewijzigd door Verwijderd op 11-09-2002 15:24 . Reden: typefout ]


Verwijderd

laat je berekende info in een tekstbestandje pleuren op de schijf van de gebruiker in de temp map bijvoorbeeld, en lees het vervolgens uit met vb

  • Stilgar
  • Registratie: Maart 2002
  • Niet online
Het lijkt me een stuk handiger om gewoon het Microsoft Internet Transfer Control te gebruiken. Daarmee kan je gewoon een webpagina inlezen in een string. Meer info vind je op msdn, bijvoorbeeld op http://msdn.microsoft.com.../vbobjinternetcontrol.asp
Ik zou volgende keer trouwens uberhaupt eerst even goed op MSDN rondkijken, dat zou de eerste stap moeten zijn als je met vragen zit over VB.

Verwijderd

wist niet van die control af, vandaar
Pagina: 1