Hola amigo:
Los caracteres que no se pueden usar dentro de un nombre de archivo permitido son los siguientes: \ / : * ? " < > |
Teniendo en cuenta esto construímos una función que recorra el nombre del fichero, y si encuentra alguno de estos caracteres devuelve FALSE.
Código:
'____________________________________________
Function ValidNomArch(cCad)
'Valida que un nombre de archivo sea válido
'¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
Dim n, aCon
ValidNomArch = True
aCon = Array("\", "/", ":", "*", "?", "<", ">", "|", Chr(34))
For n = 0 To 8
If InStr(1, cCad, aCon(n)) > 0 Then
ValidNomArch = False
Exit Function
End If
Next
End Function
Para usarla:
If Not ValidNomArch("Ast</on") Then _
Response.Write "Pruebe con otro nombre"
Ya sabes, si recoges el nombre por de un formulario o QueryString sólo tienes que llamarla así:
ValidNomArch(Request.Form("Nombre"))
Espero te ayude. Un saludo. :)
<a href="http://www.laventanita.net/" target="_blank">
<img src="http://www.breogan.org/images/Aston.gif" border="0" alt="La Ventanita.net - Lo imprescindible en la red en castellano"></a>