nube de tags en asp

[engonga]

hola encontre este script para crear una nube de tags

Código PHP:

  <%Dim SQLTagCloud, RSTagCloud, ArrayTag, I, FrequenzaMin, FrequenzaMax, FrequenzaDiff, FrequenzaDistrib, CSSClass, FrequenzaFiltro 
FrequenzaFiltro = 1
'direccio
':::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
':: http://www.dblog.it/public/post/tag-cloud-in-asp-505.asp
':::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
SQLTagCloud = " SELECT COUNT(Tag) AS Frequenza, Tag FROM Technorati GROUP BY Tag "
SQLTagCloud = " SELECT COUNT(tag) AS Frequenza, tag FROM noticias_2 GROUP BY tag " 
Set RSTagCloud = Server.CreateObject("ADODB.Recordset") 
RSTagCloud.Open SQLTagCloud, MM_alex_moga_STRING, 1, 3 
If NOT RSTagCloud.EOF Then 
  ArrayTag = RSTagCloud.GetRows 
Else 
  ReDim ArrayTag(1, -1) 
End If 
RSTagCloud.Close 
Set RSTagCloud = Nothing 
If UBound(ArrayTag, 2) > -1 Then 
  FrequenzaMin = 1 
  FrequenzaMax = 1 
  For I = 0 To UBound(ArrayTag, 2) 
    If ArrayTag(0, I) < FrequenzaMin Then 
      FrequenzaMin = ArrayTag(0, I) 
    End If 
    If ArrayTag(0, I) > FrequenzaMax Then 
      FrequenzaMax = ArrayTag(0, I) 
    End If 
  Next 
  If FrequenzaMin < FrequenzaFiltro Then 
    FrequenzaMin = FrequenzaFiltro 
  End If 
  FrequenzaDiff = FrequenzaMax - FrequenzaMin 
  FrequenzaDistrib = FrequenzaDiff / 5 
  For I = 0 To UBound(ArrayTag, 2) 
    If ArrayTag(0, I) >= FrequenzaFiltro Then 
      If ArrayTag(0, I) = FrequenzaMin Then 
        CSSClass = "tcmpiccolo" 
      ElseIf ArrayTag(0, I) = FrequenzaMax Then 
        CSSClass = "tcmgrande" 
      ElseIf ArrayTag(0, I) > FrequenzaMin + (FrequenzaDistrib * 2) Then 
        CSSClass = "tcgrande" 
      ElseIf ArrayTag(0, I) > FrequenzaMin + FrequenzaDistrib Then 
        CSSClass = "tcmedio" 
      Else 
        CSSClass = "tcpiccolo" 
      End If 
      Response.Write "<a href=""cerca.asp?cosa="& Server.URLEncode(ArrayTag(1, I)) &""" title=""Tag: "& Server.HTMLEncode(ArrayTag(1, I)) &" | Frequenza: "& ArrayTag(0, I) &""" class="""& CSSClass &""">" & ArrayTag(1, I) & "</a> " 
    End If 
  Next 
End If %> 
   

estilos

Código HTML:

<style>
a.tcmpiccolo { font-size: xx-small; } 
  a.tcpiccolo { font-size: small; } 
  a.tcmedio { font-size: medium; } 
  a.tcgrande { font-size: large; } 
  a.tcmgrande { font-size: xx-large; } 

</style> 

pero el problema es que solo regoge si en el campo tag hay una sola palabra
pero si hay mas me las une entonces no se como hacer para que me separe las palabras del campo tag y me haga el proceso


alguien sabe?


gracias de antemano