Удаление данных из строки в Vbscript - PullRequest
2 голосов
/ 14 февраля 2011

В настоящее время у меня есть переменная под названием databaseinformation в сценарии, который я пишу. Я хочу разделить это на две переменные с именами Instance_Name и Database_Name

Строка в вопросе:

[MSSQLSERVER] BESMgmt.BAK

В этом случае Instance_Name - MSSQLSERVER, а Database_Name - BESMgmt. Строка не обязательно должна заканчиваться на .BAK, но удаляет последние четыре символа из переменной. Instance_Name и Database_Name изменят значения и длину.

Спасибо за любую помощь заранее

Ответы [ 2 ]

2 голосов
/ 14 февраля 2011

@ Тринитротолуол: Рабочий код образца -

Option Explicit

Dim ToBeSplit, Instance_Name, Database_Name
Dim SplitMe
Dim Position

ToBeSplit = "[MSSQLSERVER]BESMgmt.BAK"

SplitMe = Split(ToBeSplit, "]")

If IsArray(SplitMe) Then
    Instance_Name = SplitMe(0)
    Database_Name = SplitMe(1)
End If

Instance_Name = Replace(Instance_Name, "[", "")

If InStr(Database_Name, ".") > 0 Then 
    Database_Name = Left(Database_Name, Len(Database_Name) - 4)
End If

Response.Write "Instance_Name = " & Instance_Name & "<br>"
Response.Write "Database_Name = " & Database_Name
1 голос
/ 14 февраля 2011

Или сделайте это с объектом регулярного выражения, это сделает вас более гибким, хотя некоторые скажут, что у вас есть две проблемы сейчас:

...