پاك كردن و سرچ از ديتابيس

[Amit13]

سلام دوستان

از بيلدر دور بودم .يكم گيج شدم.لطفا اين كدهام رو تصحيح كنيد.

1- من كد زير رو براي پاك كردن تمام ركوردها درون يك جدول استفاده كردم ولي جواب نگرفتم.

sql_query$ = 'DELETE * FROM table1;'
PluginSet("SQL_Plugin","sql_query$")
PluginRun("SQL_Plugin","Query")

2- كد زير رو براي سرچ تمام آدرس هايي اينترنتي كه در ديتابيس اند و با آدرس ورودي شبيه اند رو ميخوام فچ كنم.
البته فقط يك آدرس در هر بار سرچ ميخوام .اوني كه شبيه تره.
راجع به دستورات درون if خودم ميدونم اشتباهه.اينجا خلاصش كردم.

sql_query2w2$ = 'SELECT address FROM webAddress WHERE address LIKE "' + lastline2w2$ + '";'
PluginSet("SQL_Plugin","sql_query2w2$")
PluginRun("SQL_Plugin","Query")
PluginGet("SQL_Plugin","Result2w2$")
PluginGet("SQL_Plugin","Rows2w2")
If (Rows2w2>0) Then
  Result2w2$=GetArrayItem(Result2w2$,#,1)
  DisplayValue("Text","Result2w2$")
End

 

[MahmoodM30]

برای سوال اولتون کد رو به این صورت بنویسید

DeleteQuery$='DELETE FROM Table1'
PluginSet("SQL_Plugin","DeleteQuery$")
PluginRun("SQL_Plugin","UpdateDB")
PluginGet("SQL_Plugin","Updated")

برای سوال دومتون هم از این کد استفاده کنید

SQL1_Query$='SELECT address FROM webAddress WHERE address LIKE \'' + lastline2w2$ + '%\' ;'
PluginSet("SQL_Plugin","SQL1_Query$")
PluginRun("SQL_Plugin","Query")
PluginGet("SQL_Plugin","Result$")
PluginGet("SQL_Plugin","Rows")
If (Rows>0) Then
  For i=1 To Rows
    record$[i]=GetArrayItem(Result$,'#',i)
    LoadText("Name","record$[i]")
  Next i
End