MiraMedlem sedan maj 2001966 inlägg Jag e helt ny på det här... så många frågor lär det bli ;)
Jag har ett enkelt formulär där man kryssar i månad och datum (http://www.freecfm.com/m/mira/) och detta ska sedan skrivas ut på en ny sida (en lista).
Jag har gått efter IDG's webstudio och tyckte att Serverobjekt och Request passade in på det (har jag fel?)
I formuläret har jag namngett alla fält och grupperat checkboxen - månad för sej och datum för sej.
Det här är koden för när man klickar på Registrera:
<HTML>
<%
Dim Obj, TS
Set Obj = CreateObject("Scripting.FileSystemObject")
If Obj.FileExists("data.txt") = False Then
Set TS = Obj.CreateTextFile("data.txt", 8)
Else
Set TS = Obj.OpenTextFile("data.txt", 8)
End If
TS.WriteLine Request.Form("namn")
TS.WriteLine Request.Form("monad")
TS.WriteLine Request.Form("datum")
TS.Close %>
<p>
Titta på <a href="listan.asp">bokningslistan</a>.
</HTML>
och detta är koden för listan:
<HTML>
<%
Dim Obj, TS, Namn, Månad, Datum
Set Obj = CreateObject("Scripting.FileSystemObject")
Set TS = Obj.OpenTextFile("data.txt")
Do Until TS.AtEndOfLine
Namn = TS.ReadLine
Månad = TS.ReadLine
Datum = TS.ReadLine
%>
Namn: <%=Namn%>
Månad: <%=Månad%>
Datum: <%=Datum%>
<%
Loop
TS.Close %>
<p>
<a href="index.html">Tillbaka</a>
</HTML>
Filen "data.txt" ska ju skapas automatiskt, men jag kan inte hitta den...
spangoMedlem sedan juni 20008 205 inlägg Jag skulle rekommendera att du säger Server.MapPath("data.txt") i stället för bara "data.txt" så hamnar den i den katalog asp-scriptet ligger i.
------------------
Does it matter that this waste of time is what makes a life for you?
MiraMedlem sedan maj 2001966 inlägg På alla ställen eller bara efter create?Menar du såhär:
Set TS = Obj.CreateTextFile Server.MapPath("data.txt", 8)
LarsGMedlem sedan dec. 200012 464 inlägg Både vid open och create
Set TS = Obj.CreateTextFile( Server.MapPath("data.txt", 8))
Det saknades ett par parenteser i din kod
------------------
essentitia preter non sans multiplicandum
MiraMedlem sedan maj 2001966 inlägg blir det som att istället för att skriva hela sökvägen ?
(typ: d:\Inetpub\wwwroot\)
emissionMedlem sedan dec. 19996 721 inlägg Japps!
------------------
/emission
If you see someone without a smiley, give them your colon.
VideMedlem sedan dec. 19998 577 inlägg Var inte så blyg, berätta lite om ditt problem för oss... :)
------------------
Jag utvecklar invecklade veck, totalt väck
MiraMedlem sedan maj 2001966 inlägg Blyg.....???
Menar du att jag ska säga som det är - jag fattar inte ett skit...?!
Mitt problem: det funkar inte!!!
Vad är felet???
Var nu inte så blyga grabbar... visa vad ni kan!
PS. har bytt adress till: http://www24.brinkster.com/mirazo/
MiraMedlem sedan maj 2001966 inlägg ...måste jag skriva
<a href="d:\Inetpub\wwwroot\listan.asp">
eller vad nu sökvägen blir just på Brinkster.....????????????????????
VideMedlem sedan dec. 19998 577 inlägg Vad jag menade var att det är svårt att lösa ett problem när man inte vet vad problemet är... ;)
<a href="d:\Inetpub\wwwroot\listan.asp">
Funkar bara om du sitter lokalt på datorn. Du måste ha http-sökvägen: http://www.adress.com/listan.asp
Var det det som var problemet eller var det något annat?
------------------
Jag utvecklar invecklade veck, totalt väck
MiraMedlem sedan maj 2001966 inlägg Om jag visste problemet så behövde jag väl inte fråga... eller...?!
I vanliga fall, med vanliga html-filer behöver man ju bara skriva filnamnet som sökväg, om den ligger i samma mapp - är det så att man måste skriva HELA sökvägen när det gäller ASP ???
I såfall kan det vara felet...
Annars har jag lagt ut min adress + koderna och hade hoppats att någon orkade titta på det och se var felet ligger...
När man klickar på Registrera-knappen ska en textfil skapas (har inte sett till den), uppgifterna ska skrivas in där och när man klickar på länken "boknigslista" ska man se alla bokningar... men det fattar ni väl redan?
Scriptet funkar alltså inte - DET är problemet... mer kan jag inte säga - för jag VET inte.....
[Redigerat av Mira den 24 sep 2001]
MiraMedlem sedan maj 2001966 inlägg ok..... nu har jag kommit på hur jag kan få reda på vilket fel det är...
Får detta meddelande:
Microsoft VBScript runtime error '800a01c2'
Wrong number of arguments or invalid property assignment: 'FileExists'
/mirazo/reg.asp, line 5
Men vad ska det stå istället?
mikulMedlem sedan aug. 20013 824 inlägg ja i vanlig HTML kan du skriva bara data.txt
men i asp får du skriva Server.MapPath("data.txt")
om den ligger i en annan mapp...tex så här
mapp/data.txt så skriver du
Server.MapPath("mapp/data.txt")
joppas du fattar nu...
(kul att det börjar komma lite fler tjejer..:-)
/ Mikul
------------------
vad är det för fel mad att vara lat?, tänk om det blev krig och ingen kom dit.
pirroMedlem sedan aug. 2001226 inlägg Server.MapPath("/data.txt")
har jag för mig att det ska vara
------------------
-------
/Pirro
Response.Redirect " http://pereng.cjb.net "
VideMedlem sedan dec. 19998 577 inlägg Om du bara skall länka till en sida asp, html, htm, vad som hellst så är det bara att skriva sökvägen utifrån vart du står.
Så ligger den i samma mapp så behöver du inte ange någon sökväg heller.
Skall du däremot via ett script förändra en fil via FSO så måste du ange den loka sökvägen, och i det fallet använder du Server.MapPath
Mvh, Vide
------------------
Fråga: Hur kan man fördröja att mjölk blir gammal?
Svar: Låt det vara kvar i kon.
webeue.nu
MiraMedlem sedan maj 2001966 inlägg Med eller utan / ("/data.txt") ???
...men nu är det ju nåt annat som är fel - har ni inte läst felmeddelandet jag fick...?
emissionMedlem sedan dec. 19996 721 inlägg Hur ser koden ut nu?
------------------
/emission
If you see someone without a smiley, give them your colon.
MiraMedlem sedan maj 2001966 inlägg Det förra felet var tydligen att det inte skulle vara en 8 efter data.txt.
Men nu klagar den på nästa rad (6):
Wrong number of arguments or invalid property assignment: 'MapPath'
<HTML>
<%
Dim Obj, TS
Set Obj = CreateObject("Scripting.FileSystemObject")
If Obj.FileExists("data.txt")= False Then
Set TS = Obj.CreateTextFile(Server.MapPath("data.txt", 8))
Else
Set TS = Obj.OpenTextFile(Server.MapPath("data.txt", 8))
End If
TS.WriteLine Request.Form("namn")
TS.WriteLine Request.Form("monad")
TS.WriteLine Request.Form("datum")
TS.Close %>
<p>
Titta på <a href="listan.asp">bokningslistan</a>.
</HTML>
------------------
* Mira *
[Redigerat av Mira den 24 sep 2001]
emissionMedlem sedan dec. 19996 721 inlägg Som du skrivit nu blir 8:an ett argument till MapPath, men det ska vara ett argument till OpenTextFile.
<HTML>
<%
Dim Obj, TS
strPath=Server.MapPath("data.txt")
Set Obj = CreateObject("Scripting.FileSystemObject")
If Not Obj.FileExists(strPath) Then
Set TS = Obj.CreateTextFile(strPath)
Else
Set TS = Obj.OpenTextFile(strPath, 8)
End If
TS.WriteLine Request.Form("namn")
TS.WriteLine Request.Form("monad")
TS.WriteLine Request.Form("datum")
TS.Close %>
<p>
Titta på <a href="listan.asp">bokningslistan</a>.
</HTML>
------------------
/emission
If you see someone without a smiley, give them your colon.