China DOS Union

-- Unite DOS · Advance DOS · Grow DOS --
Union site: www.cn-dos.net　Forum site: www.cn-dos.net/forum

中国DOS联盟论坛
The time now is 2026-08-12 04:33

47,811 topics / 349,897 posts / today 0 new / 48,256 members

DOS批处理 & 脚本技术（批处理室） » [Completed] How to extract addresses from *.qsed files into Html?

Floor17　liu3157551	Posted 2010-01-05 19:39
中级用户　Posts 164　Credits 259
I don't know where you went, tell me the situation? Can it be solved or not?

Floor18　qinchun36	Posted 2010-01-05 20:00
高级用户　Posts 400　Credits 609
... Coding problem, only Chinese will have issues. Your file seems to need to be saved in Unicode, otherwise you need to add an XML header. Can't do it on a mobile phone.

Floor19　liu3157551	Posted 2010-01-05 20:10
中级用户　Posts 164　Credits 259
Oh. After checking, it's UTF8 encoding, so I'll just have to wait until tomorrow. Thank you, you've worked hard. [ Last edited by liu3157551 on 2010-1-5 at 20:49 ]

Floor20　qinchun36	Posted 2010-01-06 10:13
高级用户　Posts 400　Credits 609
If there are still problems, solve them by yourself. fileName = "5.txt" head = "<qsed version=""3.0.0.57"">" & vbCrLf & vbTab & "<entry>" & vbCrLf & vbTab & vbTab & "<ref href=""" tail = vbCrLf & """/>" & vbCrLf & vbTab & "</entry>" & vbCrLf & "</qsed>" Set fso = WScript.Createobject("Scripting.FileSystemObject") With fso.OpenTextFile(fileName, 1) While Not .AtEndOfStream qsed = .ReadLine tempArr = Split(qsed, "\|") tempStr = tempArr(UBound(tempArr) - 1) fso.CreateTextFile(tempStr & ".qsed", True, True).Write head & qsed & tail WEnd End With

Floor21　liu3157551	Posted 2010-04-14 12:34
中级用户　Posts 164　Credits 259
As shown in the picture, can a number be added before the hyperlink: 1.http://www.cn-dos.net/ 2.http://www.cn-dos.net/ 3.http://www.cn-dos.net/ [ Last edited by liu3157551 on 2010-4-14 at 12:39 ]

Floor24　liu3157551	Posted 2010-04-14 14:03
中级用户　Posts 164　Credits 259
There is no one more capable than Mr. Li ^_^. As soon as I mentioned it, he helped, really a good person

Prev　 1 2