Execute // Evaluate

string1 = string2 & i

/Jennemaan

ooh...

Du vil lave en dynamisk sql string?

strSQL = "Set String1 = String" & i

con.Execute strSQL

/Jennemaan

Øhhh, nej.
Det har ikke noget med SQL at gøre.
Jeg ville bare sætte variablen String1 lig med en anden streng som er forskellig. Men jo den er vel dynamisk, men det er i VB det skal foregå.

Lav en knap og et textfelt og følgende kode, det illustrere det, dette eksempel tæller bare op :O)

Dim str1 As String
Dim str2 As String
Dim i As Integer

Private Sub Form_Load()
i = 0
Text1.Text = ""
End Sub

Private Sub Command1_Click()
str2 = Text1.Text
str1 = str2 & i
Text1.Text = str1
i = i + 1
End Sub

Tror du har glemt at dimensionere variablerne (det er der der står dim)

Tubber

Nej i fatter det ikke :)

Hvis i kender flash, så er det den funktion der hedder Eval() som jeg skal bruge, bare i VB.

Jeg vil udføre et stykke kode, som bliver dynamisk genereret.
Det er ligesom med Microsoft Scripting Runtime funktion SC.AddCode men denne funktion gemmer værdien i Scripting miljøet og ikke i selve VB koden, men kan derfor ikke "trække" værdien ud af SC.

Lad mig forklare med et andet eksempel:

i = 24
Execute("Label1.Caption = Label" & 24 & ".Caption")

U see? :)

ok, men i får lidt points alligevel, :)