Sub +sqlsträngar

Tjena.
Försöker komma på ett smart sätt att lagra sql-strängar på, har en idé:

Public Function getStrings(Byval strSql)
  Select case strSql
    Case strMachine 
    strMachine = "Select * From Machines"
    getStrings = strMachine

    Case strUnit
    strUnit = "Select * From Units"
    getStrings = strUnit

    Case strDetail
    strDetail = "Select * From Details"
    getStrings = strDetail
  End Select
End Function

Set strSql = getStrings(strMachine)
...

kan detta vara ett bra sätt?

:Redigerat!! :e

Jättebra förutom att alla "casen" heter strMachine :)

jag såg det precis, var inte meningen! :)

Nej, jag förstår inte vad du tjänar på det.

Då kanske du har en bättre variant :)
Väldigt ofta använder i alla fall jag samma eller liknande strängar
till mina sidor och om man sedan kommer på att man lär ändra
nått i databasen tex. nått namn eller så, så lär man ju leta
igenom alla sidors strängar och justera och det är ju inte stabilt.

Samtidigt är jag inte hajj på hur lagrade procedurer fungerar och
man kanske heller inte alltid använder sql-server som databas.

Jag funderade också på att lägga till ett par parametrar till
funktionen för att styra where, order by och liknande.

Korkad idé eller?

Suck! Vet inte hur jag ska göra. :l
Är det nån som har nått smidigt sätt att lagra strängar på som
vill dela med sig av sina erfarenheter.

Jag tycker det blir kaos om man börjar få uppåt 20-30 sidor med en eller ett par sql-strängar på varje sida, ofta hämtar man också samma info från databasen på flera sidor.

Jag skulle vilja inkludera strängarna i en separat fil på nått vis eller nått. :OO

Tacksam för lite vägledning!

Det jag sett många applikationer gör är att lagra variabler som innehåller text som ständigt återkommer globalt på något sätt.

Ex. på text som ofta återkommer i en appl. är användarnamn, lösenord, databasnamn, databasmaskin ....

man lagrar alltså inte färdiga SQL uttryck utan dessa byggs sedan upp med värden tagna från dom globalt satta variablerna.

Då är det lätt att bytan namn på databasen (inte tabbellerna i sig!), på vilken maskin databasen finns mm.