Cuestión : Issuie que identifica la edición de la alimentación de XML

Ayuda…. Please

When que intento probar el rel= siguiente " nofollow " del " _blank " del target= de " http://jobsonlinegroup.com/feeds/mnm/careerjet_organic.asp " del href= del el
I del /feeds/mnm/careerjet_organic.asp de http://jobsonlinegroup.com consigue el error siguiente - alimentación del
xxx

The se crea usar el ASP, el código está abajo - el

There es muchos datos presentados por la alimentación, así que no puedo ver qué está causando la ayuda… del

Please de la edición ..... class= > " claro " del
> del " codeSnippet " del class= del
class= " lineNumbers " del
class= del 
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:
36:
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:
¿class= ><%@LANGUAGE= " notpretty " " VBSCRIPT " %>< del id= " codeSnippet724481 " del Los <% Response.Buffer = verdad Response.ContentType = “texto/xml” Función ApplyXMLFormatting (strInput) el strInput = substituye (strInput, “y”, “& ") el strInput = substituye (strInput, “'”, los “' ") el strInput = substituye (strInput, """", “" ") el strInput = substituye (strInput, “>”, “> ") el strInput = substituye (strInput, “<”, “< ") el strInput = substituye (strInput, “& amperio; ”, “& ") el strInput = substituye (strInput, “& #163; ”, “£ ") el strInput = substituye (strInput, “& #160; ”, "") el strInput = substituye (strInput, “sexo”, el "") el strInput = substituye (strInput, “p> ”, "") el strInput = substituye (strInput, “< ”, "") el strInput = substituye (strInput, “& nbsp; ”, "") el strInput = substituye (strInput, “& #8230; ”, "") el strInput = substituye (strInput, “p& GT; & lt; ”, "") el strInput = substituye (strInput, “  ”, "") el strInput = substituye (strInput, “b& GT; ”, "") el strInput = substituye (strInput, “toro”, el "") ApplyXMLFormatting = strInput Función del final %> ¡ ¡ el <% Searchresults déviles Searchresults_cmd dévil searchresults_numRows déviles Fijar el searchresults_cmd = Server.CreateObject (“ADODB.Command”) searchresults_cmd.ActiveConnection = MM_recruta2_STRING searchresults_cmd.CommandText = “A.JBAID SELECTO, A.JBATitle, A.JBALocation, A.JBACategory, A.JBAPayRate, A.JBADescription, A.JBAEmplymentType, A.JBAFeaturedJob, CONVERTIDO (CARBÓN DE LEÑA (11), A.JBADatePosted, 106) COMO JBADatePosted, C.JBCLName, S.JBSURL, S.JBSURLShort, S.JBSRegion de dbo.JBAdvert A interno ensamblan dbo.JBClient C en A.JBAClientID = C.JBCLID interno ensamblan dbo.JBSite S en A.JBASiteID = S.JBSSiteID DONDE el <> 3 de JBSSIteOwnerID Y el >= DATEADD (d de JBADatePosted, - JBAPostFor, GETDATE ()) Y <> “y” ORDEN de JBAFeaturedJob POR JBSURL, JBAID DESC” searchresults_cmd. Preparado = verdad Fijar los searchresults = el searchresults_cmd. Ejecutar searchresults_numRows = 0 %> el <% Repeat1__numRows dévil Repeat1__index dévil Repeat1__numRows = -1 Repeat1__index = 0 searchresults_numRows = searchresults_numRows + Repeat1__numRows %> el <% Mientras que ((<> 0 de Repeat1__numRows) Y (NO searchresults.EOF)) %> <%= (searchresults. Fields.Item (“JBSURLShort”). Valor) %> ¡<! [CDATA [<%=ApplyXMLFormatting (searchresults. Fields.Item (“JBATitle”). Valor) %> - <%=ApplyXMLFormatting (searchresults. Fields.Item (“JBAPayRate”). Valor) %> - <%=ApplyXMLFormatting (searchresults. Fields.Item (“JBALocation”). Valor) %>]] > ¡]] > ¡]] > ¡/detail~ID~<%= (searchresults. Fields.Item (“JBAID”). Valor) %>~<%=Server.URLEncode (searchresults. Fields.Item (“JBACategory”). Valor) %>-jobs-<%=Server.URLEncode (removeutfcharacters (searchresults. Fields.Item (“JBATitle”). Valor))%>-jobs-in-<%=Server.URLEncode (searchresults. Fields.Item (“JBALocation”). Valor) %>-<%=Server.URLEncode (searchresults. Fields.Item (“JBCLName”). Valor) %>-jobs-in-<%=ApplyXMLFormatting (searchresults. Fields.Item (“JBSRegion”). Valor) %>.htm]] > ¡]] > ¡]] > ¡ ¡]] > ¡]] > ¡]] > ¡]] > el <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 searchresults.MoveNext () si MOD 10 = 0 de Repeat1__numRows entonces Response.Flush () terminar si Wend %> el <% searchresults. Cerrarse () Fijar los searchresults = nada %>
class= del

Respuesta : Issuie que identifica la edición de la alimentación de XML

Estoy consiguiendo un archivo de XML según lo producido en FireFox.  La única edición verdadera que puedo ver es velocidad….  es verdadera se retarda…

este cualidades a sus preferencias de la codificación.  El IMHO, parada usar magos incorporados de la codificación (como el que está en Dreamweaver), y aprende dar código… que usted será mejor de…

Pares de extremidades….  no saltar dentro y fuera del código como eso, hace la página lenta., uso .GetRows en vez de intentar colocar a través del recordset… lanza la conexión anterior, así acelerando la página.

Así dicho, intentar atado.

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:
36:
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 Y >= DATEADD (d de JBADatePosted, - JBAPostFor, GETDATE ()) “y _
		“Y JBAFeaturedJob <> “y” ORDEN POR JBSURL, JBAID DESC”
Fijar el objConn = Server.CreateObject (“ADODB.Connection”)
	objConn.Open MM_recruta2_STRING 'fijó nuestra conexión al DB
		Fijar los objRs = objConn.Execute (strQuery) 'ejecutan nuestra pregunta
			Si no (objRs.Eof) entonces 'comprobar para ver si hay expedientes vueltos
				el arrRet = objRs.GetRows () 'consiguen los resultados en un arsenal de 2 dimensiones
			
				Response.Write (“hay no results.")
			Terminar si
		Fijar los objRs = nada 'limpian
	objConn.Close () 'limpian
Fijar el objConn = nada 'limpian
Si IsArray (arrRet) entonces 'comprueba con minuciosidad para ver si tenemos un resultset
	Con respuesta
		. Escribir ("" y VbCrLf)
		. Escribir ("" y VbCrLf)
		. Escribir (“	 “y VbCrLf)
		. Escribir (“	“y VbCrLf)
		Para i = 0 a UBound (el arrRet, 2) '2 = rema…  el arrRet (columnas, filas) 0 basó
			. Escribir (“		“y VbCrLf)
			. Escribir (“			“y arrRet (11, i) y "" y VbCrLf)
			. Escribir (“			“Y ApplyXMLFormatting (arrRet (1, i)) y” - “y ApplyXMLFormatting (arrRet (4, i)) y” - “y ApplyXMLFormatting (arrRet (2, i)) y”“Y VbCrLf)
			. Escribir (“			“y ApplyXMLFormatting (arrRet (8, i)) y "" y VbCrLf)
			. Escribir (“			“y ApplyXMLFormatting (arrRet (0, i)) y "" y VbCrLf)
			. Escribir (“			“y ApplyXMLFormatting (arrRet (10, i)) y” /detail~ID~ " y arrRet (0, i) y “~” y Server.URLEncode (arrRet (3, i)) y” - trabajos “y Server.URLEncode (removeutfcharacters (arrRet (1, i))) y” - trabajo-en “y Server.URLEncode (arrRet (2, i)) y” - “y Server.URLEncode (arrRet (9, i)) y” - trabajo-en “y ApplyXMLFormatting (arrRet (12, i)) y” .htm " y VbCrLf)
			. Escribir (“			“y ApplyXMLFormatting (arrRet (9, i)) y "" y VbCrLf)
			. Escribir (“			“y ApplyXMLFormatting (arrRet (2, i)) y "" y VbCrLf)
			. Escribir (“			Reino Unido” y VbCrLf)
			. Escribir (“			“y ApplyXMLFormatting (arrRet (5, i)) y "" y VbCrLf)
			. Escribir (“			“y ApplyXMLFormatting (arrRet (4, i)) y "" y VbCrLf)
			. Escribir (“			“y ApplyXMLFormatting (arrRet (6, i)) y "" y VbCrLf)
			. Escribir (“			“y ApplyXMLFormatting (arrRet (3, i)) y "" y VbCrLf)
			. Escribir (“		“y VbCrLf)
			Si MOD 25 entonces Response.Flush de i
		Después: i = falta de información
		. Escribir ("" y VbCrLf)
	Terminar con
	Borrar lanzamiento del arrRet 'el arsenal de la memoria

	Response.Write (“hay no results.")
Terminar si
Función ApplyXMLFormatting (strInput)
	el strInput = substituye (strInput, “y”, “&")
	el strInput = substituye (strInput, ““”, “” ")
	el strInput = substituye (strInput, """", el """)
	el strInput = substituye (strInput, “>”, “>")
	el strInput = substituye (el strInput, “<>
Otras soluciones  
 
programming4us programming4us