Frage : Issuie, das XML Zufuhrausgabe kennzeichnet

Hilfe…. Please

When, das ich versuche, das folgende Zufuhr http://jobsonlinegroup.com /feeds/mnm/careerjet_organic.asp
I, erhalten die folgende Störung -
xxx

The Zufuhr wird using Asp, der Code ist unten verursacht -

There ist viele Daten, die durch die Zufuhr vorgelegt werden, also kann ich nicht sehen, was die Ausgabe .....

Please Hilfe… verursacht 
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:
35:
6:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:
75:
76:
77:
78:
79:
80:
81:
82:
83:

<%@LANGUAGE= " VBSCRIPT " %>
<% Response.Buffer = richten aus
   Response.ContentType = „Text/xml“
   
Funktion ApplyXMLFormatting (strInput)
  strInput = ersetzen (strInput, „u.“, „& ")
  strInput = ersetzen (strInput, „'“, „' ")
  strInput = ersetzen (strInput, """", „" ")
  strInput = ersetzen (strInput, „>“, „> ")
  strInput = ersetzen (strInput, „<“, „< ")
  strInput = ersetzen (strInput, „& Ampere; “, „& ")
  strInput = ersetzen (strInput, „& #163; “, „£ ")
  strInput = ersetzen (strInput, „& #160; “, "")
  strInput = ersetzen (strInput, „Geschlecht“, "")
  strInput = ersetzen (strInput, „p> “, "")
  strInput = ersetzen (strInput, „< “, "")
  strInput = ersetzen (strInput, „& nbsp; “, "")
  strInput = ersetzen (strInput, „& #8230; “, "")
  strInput = ersetzen (strInput, „p& GT; & lt; “, "")
  strInput = ersetzen (strInput, „  “, "")  
  strInput = ersetzen (strInput, „b& GT; “, "")  
  strInput = ersetzen (strInput, „Stier“, "")
  ApplyXMLFormatting = strInput
Enden-Funktion   
    %>


<%
Schwache searchresults
Schwaches searchresults_cmd
Schwache searchresults_numRows

Searchresults_cmd = Server.CreateObject („ADODB.Command“) einstellen
searchresults_cmd.ActiveConnection = MM_recruta2_STRING
searchresults_cmd.CommandText = „AUSERWÄHLTES A.JBAID, A.JBATitle, A.JBALocation, A.JBACategory, A.JBAPayRate, A.JBADescription, A.JBAEmplymentType, A.JBAFeaturedJob, BEKEHRTER (PUTZFRAU (11), A.JBADatePosted, 106) ALS JBADatePosted, C.JBCLName, S.JBSURL, S.JBSURLShort, S.JBSRegion VON dbo.JBAdvert A, das inner ist, verbinden dbo.JBClient C auf A.JBAClientID = inneres C.JBCLID verbinden dbo.JBSite S auf A.JBASiteID = S.JBSSiteID, WO JBSSIteOwnerID <> 3 UND JBADatePosted >= DATEADD (d, - JBAPostFor, GETDATE ()) UND JBAFeaturedJob <> „y“ AUFTRAG DURCH JBSURL, JBAID DESC“ 
searchresults_cmd. Vorbereitet = ausrichten

Searchresults = searchresults_cmd einstellen. Durchführen
searchresults_numRows = 0
%>

   
   

<%
Schwaches Repeat1__numRows
Schwaches Repeat1__index

Repeat1__numRows = -1
Repeat1__index = 0
searchresults_numRows = searchresults_numRows + Repeat1__numRows
%>
<% 
Während ((Repeat1__numRows <> 0) UND (NICHT searchresults.EOF)) 
%>

<%= (searchresults. Fields.Item („JBSURLShort“). Wert) %>
<! [CDATA [<%=ApplyXMLFormatting (searchresults. Fields.Item („JBATitle“). Wert) %> - <%=ApplyXMLFormatting (searchresults. Fields.Item („JBAPayRate“). Wert) %> - <%=ApplyXMLFormatting (searchresults. Fields.Item („JBALocation“). Wert) %>]] >
]] >
]] >
/detail~ID~<%= (searchresults. Fields.Item („JBAID“). Wert) %>~<%=Server.URLEncode (searchresults. Fields.Item („JBACategory“). Wert) %>-jobs-<%=Server.URLEncode (removeutfcharacters (searchresults. Fields.Item („JBATitle“). Wert))%>-jobs-in-<%=Server.URLEncode (searchresults. Fields.Item („JBALocation“). Wert) %>-<%=Server.URLEncode (searchresults. Fields.Item („JBCLName“). Wert) %>-jobs-in-<%=ApplyXMLFormatting (searchresults. Fields.Item („JBSRegion“). Wert) %>.htm]] >
]] >
]] >

]] >
]] >
]] >
]] >

  <% 
  Repeat1__index=Repeat1__index+1
  Repeat1__numRows=Repeat1__numRows-1
  searchresults.MoveNext ()
   wenn Repeat1__numRows Umb. 10 = 0 dann 
      Response.Flush () 
 beenden wenn
Wend
%>

<%
searchresults. Schließen ()
Searchresults einstellen = nichts
%>

Antwort : Issuie, das XML Zufuhrausgabe kennzeichnet

Ich erhalte eine XML Akte, wie in FireFox produziert.  Die einzige reale Ausgabe, die ich sehen kann, ist Geschwindigkeit….  sie ist real verlangsamt…

dieses Attribute zu Ihren Kodierungpräferenzen.  IMHO, Anschlag using eingebaute Kodierung-Zauberer (wie der in Dreamweaver) und erlernen, Code zu übergeben,…, das Sie sind besser gestellt…

Paare von Spitzen….  nicht in und aus Code, wie das, die Seite langsam bilden., Gebrauch .GetRows springen, anstatt zu versuchen, sich durch das recordset zu schlingen…, freigibt den Anschluss früh und die Seite so beschleunigen.

So gesagt, versuchen angebracht.

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:
35:
6:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:


<> 3 UND JBADatePosted >= DATEADD (d, - JBAPostFor, GETDATE ()) „u. _
		„UND JBAFeaturedJob <> „y“ AUFTRAG DURCH JBSURL, JBAID DESC“
objConn = Server.CreateObject („ADODB.Connection“) einstellen
	objConn.Open MM_recruta2_STRING 'stellte unseren Anschluss zum DB ein
		objRs = objConn.Execute (strQuery) einstellen 'durchführen unsere Frage
			Wenn nicht (objRs.Eof) dann 'Überprüfung, zum zu sehen, wenn es die zurückgebrachten Aufzeichnungen gibt
				arrRet = objRs.GetRows () 'kommen die Resultate in eine Maßreihe 2
			Sonst
				Response.Write („es gibt Nr. results.")
			Beenden wenn
		objRs einstellen = nichts 'aufräumen
	objConn.Close () 'räumen auf
objConn einstellen = nichts 'aufräumen
Wenn IsArray (arrRet) dann 'doppeltkontrollieren, um zu sehen, wenn wir ein resultset haben
	Mit Antwort
		. Schreiben ("" u. VbCrLf)
		. Schreiben ("" u. VbCrLf)
		. Schreiben („	 „u. VbCrLf)
		. Schreiben („	„u. VbCrLf)
		Für i = 0 zu UBound (arrRet, 2) '2 = rudert…  arrRet (Spalten, Reihen) 0 gründete
			. Schreiben („		„u. VbCrLf)
			. Schreiben („			„u. arrRet (11, i) u. "" u. VbCrLf)
			. Schreiben („			„U. ApplyXMLFormatting (arrRet (1, i)) u.“ - „u. ApplyXMLFormatting (arrRet (4, i)) u.“ - „u. ApplyXMLFormatting (arrRet (2, i)) u.“„U. VbCrLf)
			. Schreiben („			„u. ApplyXMLFormatting (arrRet (8, i)) u. "" u. VbCrLf)
			. Schreiben („			„u. ApplyXMLFormatting (arrRet (0, i)) u. "" u. VbCrLf)
			. Schreiben („			„u. ApplyXMLFormatting (arrRet (10, i)) u.“ /detail~ID~ " u. arrRet (0, i) u. „~“ u. Server.URLEncode (arrRet (3, i)) u.“ - Jobs „u. Server.URLEncode (removeutfcharacters (arrRet (1, i))) u.“ - Job-in „u. Server.URLEncode (arrRet (2, i)) u.“ - „u. Server.URLEncode (arrRet (9, i)) u.“ - Job-in „u. ApplyXMLFormatting (arrRet (12, i)) u.“ .htm " u. VbCrLf)
			. Schreiben („			„u. ApplyXMLFormatting (arrRet (9, i)) u. "" u. VbCrLf)
			. Schreiben („			„u. ApplyXMLFormatting (arrRet (2, i)) u. "" u. VbCrLf)
			. Schreiben („			Großbritannien“ u. VbCrLf)
			. Schreiben („			„u. ApplyXMLFormatting (arrRet (5, i)) u. "" u. VbCrLf)
			. Schreiben („			„u. ApplyXMLFormatting (arrRet (4, i)) u. "" u. VbCrLf)
			. Schreiben („			„u. ApplyXMLFormatting (arrRet (6, i)) u. "" u. VbCrLf)
			. Schreiben („			„u. ApplyXMLFormatting (arrRet (3, i)) u. "" u. VbCrLf)
			. Schreiben („		„u. VbCrLf)
			Wenn i Umb. 25 dann Response.Flush
		Zunächst: I = Null
		. Schreiben ("" u. VbCrLf)
	Mit beenden
	arrRet löschen 'Freigabe die Reihe vom Gedächtnis
Sonst
	Response.Write („es gibt Nr. results.")
Beenden wenn
Funktion ApplyXMLFormatting (strInput)
	strInput = ersetzen (strInput, „u.“, „&")
	strInput = ersetzen (strInput, „„“, „“ ")
	strInput = ersetzen (strInput, """", """)
	strInput = ersetzen (strInput, „>“, „>")
	strInput = ersetzen (strInput, „<>
Weitere Lösungen  
 
programming4us programming4us