Question

VB程序远程连接MYSQL，将TEXT数据保存到本地电脑

我用VB6做了一个统计文章的程序，远程连接一个购买的商业MYSQL数据库，其中有name和article两个字段，name 数据类型为VARCHAR(4)，article数据类型为 MEDIUMTEXT。现在已经把文本内容（文章）存入到数据库中了，我的问题：如何将这些内容导出为 name.txt 保存到本地电脑里（不是服务器空间），用name值为文本的名称。请教高手：如何编写这样的代码。100分酬谢能解决问题的代码作者，先谢了。
文件名不是主要问题，问题是如何调用MEDIUMTEXT数据，保存到本地电脑。代码如何写?

在我提这个问题时就用到 尘缘べ猜 回答中的想法：用文本框接收，然后保存到本地。但问题是：内容保存不完整，后来再研究，是文本框的问题，用富文本框后就解决了。虽然二位的回答没能帮上忙，但仍然谢谢你们的热心。选尘缘べ猜 为最佳答案，是因为其思想与我的思想一至。这里附上我的部分代码，希望对有相同问题的朋友有所帮助：
RichTextBox1.Text = rs.Fields("article").Value
dim na,ar as string
ar=RichTextBox1.text
na= rs.Fields("name").Value
Open "d:\articles\" & na & ".txt" For Output As #1
Print #1, ar
Close #1

Answer 1

对于文件名，你可以进行事先的赋值，制定name 是什么 对于保存到本地，由于我的能力有限，但是我想，将内容用一个控件连接到本地然后进行保存操作。或者是赋值到本地不知道可以不可以
！

Answer 2

dim a(100) as string
For i = 1 To Len(Text1.Text)
a(i) = Mid(Text1.Text, i, 1)
Next i

在Mid函数的第二个起始位参数的值不能为0或者是负，必须是1到任何正数。要不然是错的。