用wsk1获得的文件，怎么存放在本机桌面？

修改答复：兄弟，你获得的文件是什么格式你就写什么格式的。同时我想问你如果不是Txt，比方说是Bmp你怎么传呢？硬传么？如果是这样的话，把这一句Open "C:\Documents and Settings\All Users\桌面\Wsk数据.txt" For Output As 1
改成
Open "C:\Documents and Settings\All Users\桌面\Wsk数据.bmp" For Output As 1
就可以啦。
我的意思是，代码中的扩展名只是一个例子，具体是什么还要根据情况，也就是你传什么文件临场确定的。
＝＝＝＝＝＝＝＝＝＝＝＝＝＝
这样就行了。加一个Command1。
代码如下。
＝＝＝＝＝＝＝＝＝＝＝
Private Sub Command1_Click()
Dim s As String
Winsock1.GetData s
Open "C:\Documents and Settings\All Users\桌面\Wsk数据.txt" For Output As 1
Write #1, s
Close 1
End Sub