webForumDet fria alternativet

WML och ASP

9 svar · 374 visningar · startad av Jymdis

JymdisMedlem sedan mars 20016 260 inlägg
#1

hade lite svårt å posta exempelkod så jag får skriva koden generellt:

Går det att göra en WML sida med ASP kod i utan några problem? nånting man ska tänka på?
Jag försökte nämligen göra en sida - men det funka inte - fick inte ut värden osv.

mvh
Jymdis

SPiNMedlem sedan mars 20007 896 inlägg
#2

Det ska funka kalas, så länge du tänker på att ange rätt content-type för dokumentet innan du skickar något till klienten.

Response.ContentType = "applicaction/wap.vnd.wml"

Eller hur man nu gör. Kommer inte ihåg. ;)

JymdisMedlem sedan mars 20016 260 inlägg
#3

men gör inte webservern det själv om wml filer är satta på servern?
(vanliga WML utan nån asp kod i fungerar utan problem)

SPiNMedlem sedan mars 20007 896 inlägg
#4

Nej, inte om du har filändelsen .asp ( Som du måste ha för att kunna köra din ASP ). Du måste då ändra till WMLs MIME-typ, manuellt.

JymdisMedlem sedan mars 20016 260 inlägg
#5

aha :)
men enligt Ballou.se:

Ja, det ska gå att köra ASP i .wml-filer!

SPiNMedlem sedan mars 20007 896 inlägg
#6

Aha, då har dom lagt till .wml som en filändelse för ASP. :)

Försök ändå med att sätta "rätt" content-type, så får vi se vad som händer. :)

JymdisMedlem sedan mars 20016 260 inlägg
#7

Det fungerar inte med vanligt response.write ens...
Nånting e skumt - de e väl Ballou.se som klyddat till d.. måste det väl vara?

JymdisMedlem sedan mars 20016 260 inlägg
#8

testade med att köra en .asp ändelse och sätta

Response.ContentType = "applicaction/wap.vnd.wml"

å det fungera.

JymdisMedlem sedan mars 20016 260 inlägg
#9

Okej.. nu undrar jag varför länkarna inte fungerar:

<%

Dim Recordset1
Dim Recordset1_numRows

Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_industri_STRING
Recordset1.Source = "SELECT * FROM wap"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 1
Recordset1.Open()

Recordset1_numRows = 0
%>
<%
Dim Recordset2
Dim Recordset2_numRows

Set Recordset2 = Server.CreateObject("ADODB.Recordset")
Recordset2.ActiveConnection = MM_industri_STRING
Recordset2.Source = "SELECT * FROM wap"
Recordset2.CursorType = 0
Recordset2.CursorLocation = 2
Recordset2.LockType = 1
Recordset2.Open()

Recordset2_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index

Repeat1__numRows = -1
Repeat1__index = 0
Recordset1_numRows = Recordset1_numRows + Repeat1__numRows
%>
<%
Response.ContentType = "applicaction/wap.vnd.wml"
%>
<?xml version="1.0" encoding="iso-8859-1"?>
<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.3//EN" "http://www.wapforum.org/DTD/wml13.dtd" >
<wml>
<% 
While ((Repeat1__numRows <> 0) AND (NOT Recordset1.EOF)) 
%>
<card id="<%=(Recordset1.Fields.Item("rubrik").Value)%>" title="<%=(Recordset1.Fields.Item("rubrik").Value)%>">
<P> <%=(Recordset1.Fields.Item("loptext").Value)%></P>

<% do until recordset2.eof  %> 
<P><A HREF="#<% =recordset2("rubrik")%>"><%=recordset2("rubrik")%></A></P> 
<% recordset2.MoveNext 
loop 
recordset2.movefirst %>

</card>
<% 
  Repeat1__index=Repeat1__index+1
  Repeat1__numRows=Repeat1__numRows-1
  Recordset1.MoveNext()
Wend
%>
</wml>

<%
Recordset1.Close()
Set Recordset1 = Nothing
%>
<%
Recordset2.Close()
Set Recordset2 = Nothing
%>
jarvkloMedlem sedan juli 20013 378 inlägg
#10

Det kan vara att du använder <A HREF>, en tagg som inte finns i WML ;) .
<A> och <a> är två olika taggar enligt rglerna i XML, och WML är ett XML-baserat språk

Använd <p> i stället för <P>, <a href="..."> i stället för <A HREF="..."> osv. (WML innehåller bara taggar med små bokstäver;) )

126 ms totalt · 3 externa anrop · v20260731065814-full.86db40fa
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
123 ms — hämta tråd, inlägg och bilagor (db)