2014-10-21 5 views
2

Im совершенно новый для ASP, поэтому любая помощь будет очень признательна. У меня есть html-страница, у которой есть форма для того, чтобы пользователи могли оставлять свои данные, и когда они отправляют ее, она идет в текстовый файл, но я хочу, чтобы после того, как они отправили его, я хочу получить предупреждение с сообщением «сохраненный комментарий» и остаться на исходной странице, чтобы они могли отправлять другое, если они выбирают, но когда пользователь отправляет его, он переходит на пустую страницу. моя формаЗапись в текстовый файл с использованием ASP

<form method="post" action="comments.asp"> 
<br><br> 
Age <input type="text" name="age" /> 
Name<textarea rows="1" cols="70" <input type="text" name="name" /></textarea> 
<input type="submit" value="Send Comment"> 
</form> 

мой код comments.asp файл

<% 
Dim age, name 
age = Request.Form("age") 
name = Request.Form("name") 
dim fs,f 
set fs=Server.CreateObject("Scripting.FileSystemObject") 
set f=fs.OpenTextFile("C:\Inetpub\wwwroot\Wiki\Comments.txt",8,true) 
f.WriteLine(age & " " & date() & " " & name) 
f.Close 
set f=nothing 
set fs=nothing 
%> 
+0

Я совершенно новое, и это был единственный способ, которым я мог бы получить результаты. Можете ли вы предложить лучший способ, чтобы я мог изменить код в более подходящий формат? Спасибо – New2Programming

+0

Конечно, он идет на пустую страницу, вы ничего не выводите? Вы проверили 'C: \ Inetpub \ wwwroot \ Wiki \ Comments.txt', чтобы узнать, содержит ли он что-нибудь? Если вы хотите вывести результаты своей формы, используйте 'Response.Write age &" "& date() &" "& name'. – Lankymart

+1

Если вы хотите использовать подход AJAX, вам необходимо отправить свою форму на стороне клиента, используя что-то вроде 'jQuery.post();'. – Lankymart

ответ

4
<% 
Dim fso, f 
Set fso = CreateObject("Scripting.FileSystemObject") 
'Open the file for writing 
Set f = fso.CreateTextFile(s_path & "/" & s_file_being_created, True) 
f.Write(m) 
f.Close 
Set f = Nothing 
Set fso = Nothing 
%> 
Смежные вопросы