ElseIf Mid(strMessage, 1, 6) = "/nick " Then
enaz =cint(sifre("enaz"))
encok =cint(sifre("encok"))
edtnick = Trim(Mid(strMessage, 6, Len(strMessage)))
If len(edtnick) < enaz or len(edtnick) > encok Then

verdıgın kod sayesınde bu sekılde cozuldu tesekkur ederım blue41 yuregıne saglık Allah razı olsun kolay gelsin.