Binary

I've not been here in a while and VB World has defenatly improved
Well done all
Anyway my question
I can convert binary into anscii and into text but how would I do that the other way around
ansci into binary
how?
Thanks everyone

Function convbintoasc(str as String) as String
Dim T1 As String * 3
Dim le&
Dim T2$
le = Len(str)
For x = 1 To le
T1 = Asc(Mid(str, x, 1))
T2 = T2 & T1
Next
convbintoasc = T2
End Function

------------------
Razzle
ICQ#: 31429438

No I think that you missunderstand me
that code converts text ie alpha neumeric into anscii
I want to convert anscii into binary
any ideas on that one?

oooh, sorry! I should have read your question properly..

------------------
Razzle
ICQ#: 31429438

No problem man
Thanks for the idea though

This Could be a starting point for you.

------------------
Boothman

Quote:

---

There is a war out there, and it is about who controls the information, it's all about the information.

---

thanks mam
:)