|
|
|
нужно результаты запроса вывести в другой файл
|
|||
|---|---|---|---|
|
#18+
помогите пожалуста найти ошибку!!! нужно результаты запроса вывести в другой файл. так не срабатывает var recodSet5=adoConnection.Execute("select * from " + namtab + ";"); var filepath="C:\\Documents and Settings\\Администратор\\Рабочий стол\\тостер\\"+namtab+".html" var fso=new ActiveXObject("Scripting.FileSystemObject") var myfile=fso.CreateTextFile(filepath, true) myfile.WriteLine("<html>") myfile.WriteLine("<head>") myfile.WriteLine("</head>") myfile.WriteLine("<table border='2'>") myfile.WriteLine("<tr ><td width='400' colspan='4' ><center>Результат по тесту</center></td></tr>") myfile.Write("<tr><td width='150'>номер вопроса</td>") myfile.Write("<td width='150'>Вариант ответа</td>") myfile.Write("<td width='150'>Ответ</td>") myfile.Write("<td width='150'>Правельность ответа</td></tr>") while(!recodSet5.EOF){ myfile.Write("<tr><td width='150'>") myfile.Write(id) myfile.Write("</td>") myfile.Write("<td>") myfile.Write(name) myfile.Write("</td>") myfile.Write("<td width='150'>") myfile.Write(myFlaff) myfile.Write("</td>") myfile.Write("<td width='150'>") myfile.Write(flagRightf) myfile.Write("</td>") myfile.Write("</tr>") recodSet5.MoveNext(); } myfile.Write("</table>") myfile.Close() ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.08.2007, 02:17 |
|
||
|
нужно результаты запроса вывести в другой файл
|
|||
|---|---|---|---|
|
#18+
Код: plaintext 1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 11. 12. 13. 14. 15. 16. 17. 18. 19. 20. 21. 22. 23. 24. 25. 26. 27. 28. 29. 30. 31. 32. 33. 34. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.03.2008, 04:01 |
|
||
|
|
start [/forum/topic.php?fid=22&fpage=341&tid=1456732]: |
0ms |
get settings: |
6ms |
get forum list: |
9ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
28ms |
get topic data: |
6ms |
get forum data: |
1ms |
get page messages: |
19ms |
get tp. blocked users: |
1ms |
| others: | 188ms |
| total: | 262ms |
| 0 / 0 |
