Hur städar man upp en variabel.
Alltså ta bort mellanrum och andra tecken som inte ska vara med
Ex den ena vill jag bara ha siffror och bokstäverna kvar
Den andra vill jag har siffror,bokstäver och bindesträck.

Något med mina variablar som gör att programmet inte fungerar som den ska.

<code>
Variabel = "hej san"
Variabel = Replace(Variabel, " ", "")
Msgbox Variabel
</code>


Thomas

Japp har försökt me det men endå så bråkar den. så det måste var något mer som jag inte ser men som ska bort

<code=asp>
strMyString = "hej här finns det en massa tecken )¤/# som jag inte vill ha med"
strInvalidChars = " !""#¤%" ' alla tecken som inte får förekomma

for I = 1 to len(strInvalidChars)
strMyString = replace(strMyString, mid(strInvalidChars, I, 1), "")
next
</code>

aha, tackar, ska testa det imorgon.

eller det kanske finns en tvärtom att man skriver in de man godkänner ;)

Få se som sagt imorgon hur det går för det är skumt alltså

Hmm den gillar inte Mid

oj.. hade gjort en miss i koden - korrigerat ovan

Lite bättre men får endå problem
Jag har nu denna

<code>
strInvalidChars = " !""#¤%" ' alla tecken som inte får förekomma

For i = 1 To Len(strInvalidChars)
datornamn = Replace(PCName, Mid(strInvalidChars, i, 1), "")
Next

datornamn = Replace(datornamn, " ", "")
</code>

Jag får detta ....&datornamn=PC &anv=Cazz

Alltså den får med sig ett mellanrum

Kör jag bara med din kod så får jag

....&datornamn=CAJ &anv=caj

En väldigt stort mellanrum

Du måste ju naturligtvis lägga till alla tecken du vill ta bort i strängen.

strInvalidChars = " !""#¤% &"

Jo men det har jag ju redan ett mellanrum fast den kanske inte kan läsa mellanrum som tecken?

Använder jag denna kod
<code>
datornamn = RTrim$(PCName)
</code>

Så tar jag bort alla mellanrum utom en??

....&datornamn=PC &anv=Cazz

strInvalidChars = " !""#¤% &"

Testa att skriva så här, problemet är "fnuttarna"
<code>
strInvalidChars = Chr$(32) & Chr$(0) & "!#¤%&"
</code>

JIPPI det fungerar
Tackar så mycket :)

Oki bra att jag tänkte rätt för en gångs skull.
Det där med "fnuttar" är alltid ett problem.
För att skriva det du ville skulle det ha sett ut så här.
<code>
Private Sub Command1_Click()
'illustrera Space
MsgBox """ """
End Sub
</code>