mach das and raus dann funktioniert es , ums trings zusammenzufügen benutzt man das & Zeichen also:

Code:
My.Computer.FileSystem.WriteAllText("D:\windows124.txt", strName2 & strName, False)
MfG